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Foreword 



This book is designed to teach you about programming music and 
sound on your Commodore 64 home computer. You don't have to be 
an experienced programmer to use this book. We'll show you, step by 
step, how to program sound and musical ideas. If you're not a musi- 
cian, well show you ways to create sound effects that you may find useful 
in some of your programming endeavors. If you have an interest in music, 
we will offer ways to apply your musiceil knowledge and composition 
ideas to the realm of electronic computer music. 

Your Commodore 64 is equipped with one of the most sophisticated 
sound chips on the home computer market today. It's called the SID 
chip— shorthand for Sound Interface Device. With this chip, combined 
with the Commodore's 64K memory, its advanced color graphics 
capabilities and easy-to-use BASIC language, the opportunities for 
creative endeavor are almost as limitless as the human imagination. 

This book treats the computer as a musical instrument. As with any 
instrument, a proper foundation in technique is always a good place to 
start. First notes are often tentative. But, as any musician will tell you, 
learning a new instrument can be as exciting as discovering a new world. 
In this case you will not be learning how to pluck strings, finger 
keyboards, or make a reed vibrate. You will be learning how to pro- 
gram electronic sound. You will learn about a process called Electronic 
Sound Synthesis that will enable you to take your computer/instrument, 
and not only make it sound as if it's plucking strings or fingering the 
notes of acoustical instruments, but actually create sounds and tones 
never before heard from acoustical instruments. 

With just a few BASIC and/or assembly language statements and com- 
mands, you can have your computer create all sorts of complex sound 
effects. These sound effects can be inserted into video game programs 



or incorporated into your computer graphic art projects. Imagine an 
instrument that can at one moment sound like rain falling on tin drums 
or a roaring brook in the springtime, and the next moment sound like 
a cow mooing or a rocket blasting off! Imagine an instrument that can 
play notes as fast as you can hear them, or an instrument that can play 
your compositions— not only forward, but backward and inside-out! 
How about an instrument that will assign colors to your notes and create 
a graphic display of your music? Or maybe, an instrument to play an 
accompaniment while you play your flute or guitar? Finally, how about 
an instrument that will create its own compositions and original music? 

All this and more is possible with your Commodore 64— and you can 
do it. 
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SECTION I 




Introduction: An Overview of 
Electronic Music Synthesis and the 
SID Chip 



These opening chapters are designed to give you an elementary 
understanding of electronic sound synthesis, as well as to introduce you 
to some of the "ins and outs" of the SID chip. We suggest that you take 
the time now to familiarize yourself with this information. It will make 
your understanding of what follows that much greater. 

Each chapter in this section will provide an explanation of a particular 
aspect of creating soimd, followed by a program to demonstrate the 64's 
abilities in this context. At this stage, we want you to hear what some 
of the computer's sound controls can create. Later on, we'll show you 
how to use them. 

If you are already familiar with these concepts, or if you are the type 
of person who likes to jump right in and experiment, by all means, skip 
ahead. After all, theory is often after the fact of creation. But do take 
the time, somewhere along the line, to come back to this material. If 
you're going to build a house, you might as well start with a strong foun- 
dation; and if you're going to build a sound, it's a good idea to do the 
same. We've given you this formatted material first in the belief that 
it's better to understand what it is that you're trying to accomplish before 
you go ahead and program: that way, you're not just programming a 
bunch of meaningless numbers; you're learning how the computer works 
with the SID chip to produce the desired end. 
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1 Sound and Vibration 



Sound is produced when a vibrating source sends air particles into 
motion. As the vibrating source pushes out, it compresses the air par- 
ticles around it. As it pulls in, it pulls them apart. This is known as "com- 
pression" and "rarefaction." As the air particles around the vibrating 
source undergo this compression and rarefaction, they bump into other 
air particles, setting them into motion. This is how the vibrations are 
carried through the air to the listener. A series of "compressions and 
rarefactions" is called a "sound wave." 

People have developed many different kinds of instruments which act 
as vibrating sources. Some of the first included sticks and rocks. Later 
on, drums were created by stretching skins over hollow logs. Still later 
came flutes, which sent the air into vibration with breath. And then, 
vibrating strings were added to the music of humankind. Bellows pushed 
air through organ pipes and reeds. All of these instrvunents produced 
sound by directly setting the air into motion. 

Electronic instruments such as our computer with its sound chip pro- 
duce sound in an indirect manner. They have oscillators which are signal- 
generating components. Electronic instnmients produce variations in elec- 
trical current. This current is then processed through various filters and 
sound envelopes which we can program. The current then goes to an 
amplifier, which increases its power so that it can drive a speaker. The 
speaker, in turn, becomes the vibrating source which creates the sound 
waves. 

Your Commodore 64 has three independently controlled oscillators, 
or voices, which you can program for pitch, waveform selection, and 
volume or amplitude. In addition, you can use the oscillators together 
to get complex effects such as RING MODULATION and Synchro- 
nization. 
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If you would like to hear these oscillators in action, try typing in this 
program. It utilizes all three voices, each playing a different waveform 
and pitch. On a new line, type RUN and you will hear the 64 at work. 

5 FOR Z = 54272 TO 54296 : POKE Z,0 : NEXT 

10 M = 54272 : POKE M + 24,15 

30 POKEM + 5,168:POKEM + 6,169 

40 POKE M + 12,88 : POKE M + 13,89 

50 POKE M + 19,88 : POKE M + 20,89 

60 READ A,B,C,D,E,F,G 

70 IFA<0THEN POKE M + 24,0: END 

80 POKE M+1,A: POKE M + 0,B 

90 POKE M + 8,C: POKE M + 7,D 

m POKE M+15,E: POKE M+14.F 

110 POKE M + 4, 17 : POKE M + 11,33 : POKE M + 18,65 

120 POKE M + 16, 128: POKE M+ 17,0 

130 FOR Z = 1 TO G : NEXT 

140 POKE M + 4, 16 : POKE M + 1 1 ,32 : POKE M + 1 8,64 

150 GOTO 60 

200 DATA 15,210,0,0,0,0,2000 

210 DATA 15,210,21,31,0,0,2000 

230 DATA 15,210,21,31,23,181,2000 

240 DATA 28,49,21,31,23,181,2000 

250 DATA 28,49,37,162,23,181,2000 

260 DATA 28,49,37,162,42,62,2000 

270 DATA 28,49,21,31,31,165,3000 

Sm DATA -1,-1,-1,-1,-1,-1,-1 

If you are using your TV as a monitor, chances are that you are 
also using it for sound. If you want to hear a richer, clearer sound, 
you can connect the audio output located on the back of your com- 
puter to your stereo or to an instrument amphfier. This is easily 
accomplished. 
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2 Frequency and Pitch 



We have said that a sound wave consists of a series of compressions 
and rarefactions that set the air in motion. The amount of time that 
it takes for one compression and rarefaction to occur is called a cycle. 
The frequency of a sound is determined by the number of cycles per 
second. When a sound wave is vibrating at a regular frequency, we say 
that it is a "pitched tone." Frequency is a quantitative property of sound 
measured in cycles per second, or Hertz. Pitch is a qualitative or psycho- 
logical property of sound. Frequency and pitch are not the same 
acoustically even though we use the terms interchangeably. The average 
person can hear a sound range with frequencies from about 20 cycles 
per second to about 20,000 cycles per second. 

Your Commodore 64 can produce a full eight octaves' worth of 
pitches, reinging from a low of 16 cycles per second to a high of 3,952 
cycles per second. To give you an idea of what this means, compare 
this range to the human voice, which has a four octave range from about 
125 to 1,000 cycles per second, or to a grand piano with a range of 27.5 
to 4,186 cycles per second. Most orchestral music has a range of about 
30 to 3,951 cycles per second. 

Here is a program that will demonstrate the pitch remge of your 
computer. 

5 REM •** "PITCH RANGE" *** J.C. VOGEL 
10 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 
20 POKE 54296,15 
30 POKE 54277,0: POKE 54278,128 
40 POKE 54276,17 
50 FOR T = 1 TO 200 : NEXT 
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60 READA.B 

70 IF A = < THEN GOTO 900 
80 POKE 54273,A : POKE 54272,B 
90 GOTO 20 

100 DATA 1,12,1,102,1,145,1,221,2,24,2,204,3,35,3,187,4,48,5,152,6,71,7,119 
110 DATA 8,97,11,48,12,143.14,239,16,195,22,96,25,30,29,223,33,135,44, 
193,50,60 

120 DATA 59,190,67,15,89,131, 100,121, 134,30,179,6,2e©,243,238,248 
130 DATA -1,-1 
900 POKE 54296,0 
910 END 

Remember to type RUN on a new line to hear the program. 

There are several ways to make the computer produce a desired pitch. 
We will discuss these methods in a later chapter, "Progrsunming Pitch." 
For now, we just want to familiarize you with what your 64 can. 
accomplish. 

Here is another, longer program that demonstrates the chromatic 
scale for the entire range of the 64. 

1 REM *** NICK'S SCALER **» BY J.C. VOGEL & NICK 

5 FOR Z = 54272 TO 54296 : POKE Z,0 : NEXT 

10 FOR I = TO 7 

20 POKE 54296,15 

30 POKE 54277,0 : POKE 54278, 128 

40 POKE 54276,17 

50 READ A : IF A = - 1 THEN GOTO 9013 

60 A = A/2 t I 

70 L% = A/256 : H% = A-(256*L%) 

80 IF TI < TM + 10 THEN 80 

90 TM = TI 

m POKE 54273,L<% : POKE 54272,H% 

110 GOTO 40 

200 DATA 64814,61176,57743,54502,51443,48556,45830,43258,40830, 

38539,36376,34334 

800 DATA - 1 

9m RESTORE 

910 NEXT I : FOR T = 1 TO 200 : NEXT : POKE 54296,0 

920 END 
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3 Waveforms 



Generating a wide range of pitches is not the only job that the three 
oscillators perform. They also produce foxir different waveforms at each 
of the desired pitches. Each waveform has its own unique tone quality 
or color. We call this tone coloring "timbre," and it is one of the simplest 
and most powerful sound controls with which you can work. It is the 
difference in timbre or tone coloration that enables you to distinguish 
an instnmient like the trumpet with its brassy sound from the warm tone 
of a violin. Timbre is largely the result of waveshape. 

Before we go any further with our discussion of waveforms, perhaps 
you would like to hear them. Try typing in this program on your 64. 
It's a brief passage from "The Flight of the Bumble Bee" by Rimsky 
Korsakoff. The program is designed to play the passage four times. The 
first time through, it will demonstrate the Sawtooth waveform; the sec- 
ond time, the Triangle waveform; the third time, the Pulse waveform; 
and the final time through, it will demonstrate the "White Noise" 
waveform. 
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REM *** FLIGHT OF THE BUMBLE BEE *** 


10 


FOR M = 54272 TO 54296 : POKE M,0 : 


NEXT 


20 


WF(0) = 33 : WF(1) = 17 : WF(2) = 65 


: WF(3) = 129 


30 


POKE 54296,15 




40 


POKE 54274,9 : POKE 54275,255 




50 


POKE 54277,137 : POKE 54278,128 




60 


READH,L 




70 


IF H<0 THEN 900 




80 


POKE 54273,H : POKE 54272,L 




90 


POKE 54276, WF(I) 
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100 FOR T = 1 TO 50 : NEXT 
110 GOTO 60 

200 DATA 28,49,26,156,25,30,23,181,22,96 
210 DATA 29,223,28,49,26,156,28,49 
220 DATA 26,156,25,30,23,181,22,96 
230 DATA 23,181,25,30,26,156,- 1, - 1 
^30 POKE 54276,0 

910 RESTORE : I = 1 + 1 : IF I = 4 THEN END 
920 GOTO 60 

As you can hear, each waveform has its own distinct tone quality. 
This is because the shape of the wave governs the number and amplitude 
(volume) of the partials, or harmonics, that you hear. If you would like 
to explore this further, here is a more detailed explanation of waveforms, 
but don't get discouraged if you don't immediately grasp it. Remember, 
the SID is doing all this hard work for you. All you will have to do 
is type in a few numbers. 

Each pitched soundwave vibrates at a fundamental frequency. This 
fundamental harmonic, as it is known, is a sine wave. It looks like this 
on an oscilloscope: 




The fundamental is the actual pitch you hear. In addition to this fun- 
damental, other sine waves are generated. The second harmonic vibrates 
at twice the frequency of the fundamental, while the third vibrates at 
three times the frequency. Theoretically, there are an infinite number 
of harmonics. The reason why you don't hear them is because each har- 
monic is progressively quieter. 

In the Sawtooth waveform, all the harmonics are present. Each har- 
monic, however, grows progressively quieter in a ratio that is equal to 
the reciprocal of the harmonic number. Thus, the second harmonic is 
one-half as loud as the fundamental, while the third harmonic is one- 
third as loud. The Sawtooth waveform gets its name from its shape, 
which looks like this: 
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The Triangle waveform contains only the odd harmonics in an 
amplitude ratio equal to the reciprocal of the square of its number. Thus, 
harmonic two would not be present, while harmonic three would be one- 
ninth as loud as the fundamental. Similarly, harmonic four would not 
be present, while harmonic five would be one-twenty-fifth as loud as 
the fundamental. The Triangle waveform looks like this: 




The Pulse waveform is a rectangular shape. You can program the width 
of the pulse. Each rectangular wave that you program will exhibit a dif- 
ferent harmonic content. That makes this your most variable sounding 
waveform. The Pulse waveform will look something like this, depend- 
ing on your pulse width: 



You can also create a square waveform with this setting. A square wave 
will contain only odd harmonics at an amplitude ratio equal to the 
reciprocal of the harmonic number. Thus, the third harmonic would be 
one-third as loud as the first, while the fifth would be one-fifth as loud. 

The final waveform selection is "White Noise," which is a random 
generation of all frequencies at equal energy. This waveform is especially 
useful for percussive sounds, as well as for a wide variety of sound effects. 

As you can see, each waveform generated a different range of har- 
monics. It is this difference that provides you with a wide variety of 
tone colors. Once again, the SID will do all the work in generating these 
waveforms. You just tell it which one you'd like. We'll show you how 
this is done in the chapter entitled, "Controlling Waveforms." 
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4 The Envelope Generator 
Attack/ Decay/ Sustain/ 
Release (ADSR) 



We have seen how the oscillators of the SID produce a pitched 
waveform. The next step in sound production is the control of the 
amplitude or volume of the wave. The SID accomplishes this with three 
controls. The first is a master volume setting which remains constant 
and governs all three voices simultaneously. The second control is an 
Amplitude Modulator, of which there are three, one for each voice. The 
Amplitude Modulator governs the volume output of each oscillator, and 
is in turn governed by its own Envelope Generator. The third control 
is the Envelope Generator which directs the Amplitude Modulator by 
defining how loud the sound will be during different phases of its pro- 
duction. These phases are called the ATTACK, DECAY, SUSTAIN and 
RELEASE of the sound. Together, they comprise an "envelope" for the 
sound, hence the name. Envelope Generator. 

The Envelope Generator is triggered when the waveform oscillator 
is "gated," or turned on. The first phase of the envelope is the ATTACK. 
The ATTACK controls how quickly the output of the oscillator will rise 
from zero to its greatest amplitude or volume. The next phase is the 
DECAY. The DECAY setting of the envelope governs how rapidly the 
output of the oscillator— the sound— will drop from its highest or loudest 
point to the next phase, called SUSTAIN. The SUSTAIN setting instructs 
the Amplitude Modulator to halt the DECAY of the sound at a given 
point and to SUSTAIN it at that level for as long as the waveform is 
gated. When the waveform is turned off, the envelope enters its final 
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phase, which is the RELEASE. The RELEASE controls how quickly 
the volume wiU drop from the SUSTAIN level back down to zero. 

The ADSR is a truly powerful control. It plays a major role in creating 
sounds that resemble acoustical instruments, as well as in creating wholly 
original sounds. This is because each instrument has its own unique 
envelope. 

Consider a piano. It has a very explosive ATTACK, rising rapidly 
to its peak volume. The sound then drops or DECAYs over a relatively 
long period. When you remove your finger from the key, the note is 
RELEASEd, and the sound quickly drops to zero. 

A stringed instrument, such as a cello, can have several different kinds 
of envelopes, depending on how it is played. If it is bowed, the ATTACK 
will be rather gradual. According to the dynamics of the particular stroke, 
the DECAY can be rather slight, followed by a long SUSTAINing period. 
When the bow is removed, the note is RELEASEd and gradually fades 
away. If the note is plucked, however, the ATTACK will be quick and 
forceful. Then it will DECAY over a long period. This is a similar 
envelope to those for all plucked instruments. 

Some instruments, such as the organ, have an instantaneous ATTACK 
with absolutely no DECAY. Instead, the SUSTAIN holds the note at 
peak volume until RELEASE. The RELEASE, like the ATTACK, is 
then instanteineous. 

There are 16 possible settings for each phase of the envelope, so you 
can create just about any configuration you can imagine. We'll show 
you how in the chapter, "Programming the ADSR Controls." If you're 
curious, try typing in this program. It will demonstrate four separate 
and unique envelopes using the same waveforms and pitches. 

5 REM *** FOUR ENVELOPES *** 

10 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 

20 AD(0) = 144 : AD(1) = 8 : AD(2) = 65 : AD(3) = 

30 SR(0) = 243 : SR(1) = 9 : SR(2) = : SR(3) = 128 

40 POKE 54296,15 

50 POKE 54277, AD(I) : POKE 54278,SR(I) 

60 READH.L.DR 

70 IFH<0THEN900 

80 POKE 54273,H : POKE 54272,L 

90 POKE 54276,17 

im FOR T = 1 TO DR : NEXT 

110 POKE 54276,16 
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120 GOTO 50 

200 DATA 7,12,300,7,233,300,8,225,300,9,247,250,11,48,250,12,143,250, 
14,24,200 

210 DATA 15,210,200,17,195,200,19,239,150,22,96,150,25,30,150,28,49,100 

220 DATA 31,165,100,35,134,100,39,223,50,44,193,50,50,60,50,56,99,1750 

230 DATA -1,-1,-1 

900 RESTORE : I = I + 1 : IF I = 4 THEN POKE 54296,0 : END 

910 GOTO 50 
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5 Understanding Filters 



So far, we have examined how electronic sound is created through 
the use of oscillators, which can generate a wide range of pitches and 
four distinct waveforms. This pitched waveform is then processed through 
the Amplitude Modulator under the direction of the Envelope Generator, 
adding further definition to the overall output. At this point, the elec- 
tronic signal encoding the sound is ready to be passed through the audio 
out to the amplifier. 

In more advanced sound programming, however, we may want to 
refine our sound further. This can be done with a series of filters that 
are available in the SID. Again, this is not a necessary procedure when 
you are first starting out, but it is a highly desirable control to have in 
any synthesizer: it adds a great deal to the timbre or tone coloration 
possibilities of your sound. Here is an explanation of how the filters 
work. Well show you how to control them in the chapter, "Program- 
ming Filters." 

The SID chip is equipped with three kinds of filters, which you may 
use individually or together. You also have the option of using these 
filters on any or all of your voices at once. The filters are called the 
"low-pass" filter, the "high-pass" filter, and the "band-pass" filter. Their 
main function is to increase or decrease the amplitude or intensity of 
frequencies. When we increase the amplitude, we "resonate" the fre- 
quency. When we decrease the amplitude, we "attenuate" the frequency. 
This function is also called "passing and rejecting." 

You will recall from our discussion of waveforms that a given pitch 
produces a fundamental tone and a series of harmonics, or partials. The 
number and intensity of these partials gives the sound its timbre. Through 
the use of filters, we can further control the harmonic content of our 
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sound. This is called Subtractive Synthesis. 

To use the low-pass filter, you first choose a cut-off frequency. The 
filter will allow all the harmonics below the cut-off to pass unaltered. 
All the harmonics above the cut-off will be attenuated (decreased) pro- 
gressively. This is one of the most commonly used filters because it pro- 
duces a brassy-sounding timbre for pitched notes. 

The high-pass filter is the reverse of the low pass-filter. It allows all 
the harmonics above the cut-off frequency to pass unaltered, and at- 
tenuates all those that fall below. This filter is not especially good for 
pitched tones because it filters out the fundamental and most of the lower 
harmonics. It is very useful when used with the "White Nosie" waveform, 
producing a wide variety of sounds. 

The third filter is the band-pass filter. It allows only a narrow band 
of frequencies around the cut-off point. All those above and below the 
band will be attenuated. 

You can obtain the opposite effect of a band-pass filter by combin- 
ing a high and a low filter. This is known as a band reject filter. It will 
pass all frequencies above and below the cut-off, and reject those at the 
cut-off. This is a very specialized filter. 

You can further control these filters with a Resonance control. This 
control emphasizes the frequencies aroimd the cut-off frequency selected 
for the filter. 

One final word about the SID filter concerns the rate of attentua- 
tion. Each filter is permanently set to attenuate the frequencies at a given 
rate. This rate is measured in decibels (dB) per octave. A decibel is a 
relative measiurement, a ratio between a fixed soimd and another sound. 
It is not an absolute quantity. It has been determined that the smallest 
difference in loudness between two pitches that the human ear can detect 
is three dB. It has also been determined that a three dB increase cor- 
responds to a doubling of the sound's intensity. 

The SID's low-pass and high-pass filters are set to attenuate frequencies 
at 12 dB per octave. The band-pass filter attenuates frequencies at six dB. 

To get a brief demonstration of the power of these filters, try out 
this program. It will produce the same tone filtered through a low-pass 
filter, a high-pass filter, and finally, a band-pass filter. 

5 REM *** FILTERS *** 

10 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 

15 POKE 54295,V(I) : POKE 54296,F(I) 

16 POKE 54293,LC(I) : POKE 54294,HC(I) 

20 V(0) = : V(l) = 1 : V(2) = 1 : V(3) = 1 : REM 54295 
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30 F{0) = 15 : F{1) = 31 : F(2) = 47 : F(3) = 79 

40 LC(£D = : LC(1) = : LC(2) = 5 : LC(3) = 

50 HC(0) = : HC(1) = 100 : HC(2) = 135 : HC(3) = 110 

60 POKE 54295,V(I) : POKE 54296,F(I) 

70 POKE 54293,LC(I) : POKE 54294,HC(I) 

80 POKE 54277,0 : POKE 54278,128 

90 POKE 54273,11 : POKE 54272,218 

100 POKE 54276,33 

110 FOR DR = 1 TO 2500 : NEXT 

120 POKE 54276,32 

130 I = I + 1 : IF I = 4 THEN POKE 54296,0 : END 

140 GOTO 60 
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Ring Modulation, 
Synchronization, 
Timbre Modulation 



The SID offers you three additional ways to alter your sound, other 
than those discussed in previous chapters. 

The first is the Ring Modulator. It's one of the easiest controls to use, 
and produces a wide array of crazy and funny sounds. When set, the 
Ring Modulator multiplies the the output of two oscillators, producing 
the sum and difference of the harmonics. Here is what it sounds like. 

5 REM *** POTS AND PANS *** 

10 FOR M = 54272 TO 54286 : POKE M,0 : NEXT 

20 POKE 54296,15 

30 POKE 54277,7 : POKE 54278,0 

40 READH,L,DR 

50 IF H<0 THEN 900 

60 POKE 54287,H : POKE 54273,L 

70 POKE 54276,21 

80 FOR T = 1 TO DR : NEXT 

90 POKE 54276,20 

95 FOR B = 1 TO 34 : NEXT 

100 GOTO 30 

200 DATA 18,209,75,21,31,75,23,181,150,28,49,150,28,49,225,31,165,75 

210 DATA 28,49,150,23,181,150,18,209,225,21,31,75,23,181,150,23,181,150 

220 DATA 21,31,150,18,209,150,21,31,450 
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250 DATA -1,-1,-1 

900 RESTORE : I = 1+ 1 : IF I = 2 THEN POKE 54296,0 : END 
910 GOTO 30 

The Sync function of the SID synchronizes the fundamental fre- 
quencies of two oscillators. If you vary the pitches of the oscillators, 
you can produce a broad variety of complex harmonics. Type in this 
program to hear what synchronization can sound like. It adds the sync 
effect to the "Nick's Scaler" program used in Chapter 2. 

1 REM *** NICK'S SCALER *♦* BY J.C. VOGEL & NICK 

2 REM *** SYNC *♦* 

5 FOR Z = 54272 TO 54296 : POKE Z,0 : NEXT 
10 FOR I = TO 7 
20 POKE 54296,15 
30 POKE 54277,0: POKE 54278,128 
40 POKE 54276,19 

50 READ A : IF A = - 1 THEN GOTO 900 
60 A = A/2 I 

70 = A/256 : H^ = A - (256*L<!?b) 
80 IFTKTM + 10THEN80 

90 TM = TI 

100 POKE 54287,L<!7o : POKE 54273,H% 
110 GOTO 40 

200 DATA 64814,61 176,57743,54502,51443,48556,45830,43258,40830,38539, 

36376,34334 
800 DATA - 1 
900 RESTORE 

910 NEXT I : FOR T = 1 TO 200 : NEXT : POKE 54296,0 
920 END 

We'll show you how to set these controls in the chapter called, "Ring 
Modulator and Synchronization Effects." 

Finally, some of the most dramatic sound colors can be produced 
by a special function that allows you to modulate a sound or a series 
of sounds of a voice using the output of the oscillator and Envelope 
Generator of voice three. This modulation can produce complex sound 
effects, after the manner of a Phaser of a Wah-wah pedal. We'll 
describe how to do this in Chapter 29, "Frequency Modulation." 
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SECTION II 




Introduction to Section II 
Programming Sound Controls 



Now that you have an overview of the actual process the SID goes 
through to produce a sound, you're ready to learn how to program its 
controls. Let's jump right in and construct a short sound program. 

5 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 

10 POKE 54296,15 

20 POKE 54277,0 : POKE 54278, 128 

30 POKE 54272,28 : POKE 54273,49 

40 POKE 54276,17 

50 FOR T = 1 TO 900 : NEXT 

60 POKE 54276,16 

Here is a line-by-line description of what this program is doing. 

5 is a standard command to clear the sound chip of any past program- 
ming information that might be in its memory. 

10 sets the master volume at 15, its maximum setting. 

20 sets the ADSR controls for Voice 1. The first POKE statement sets 
the ATTACK/DECAY cycle for Voice 1, while the second POKE 
statement sets the SUSTAIN/RELEASE cycle for Voice 1. 

30 encodes the pitch, using two POKE statements. The first number en- 
codes the Low Frequency number for Voice 1. The second number 
encodes the High Frequency. Taken together, they encode the pitch 
A 440. 

40 turns on the Triangle waveform by opening up a gate. This gate trig- 
gers the ADSR to being its ATTACK/DECAY and SUSTAIN cycles. 

50 is a time loop. It instructs the computer to wait for a time and then 
proceed to the next command. This controls the duration of the sound. 
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60 closes the gate, which signals the RELEASE cycle of the ADSR and 
the end of the note. 



With these commands, we have instructed the oscillators of Voice 
1 to produce a pitched waveform that was passed through an ADSR 
envelope and volume control. 



OSC I 
Pitch 
Waveform 




Amplitude 
Modulator 




Master 
Volume 




Audio 
Out 










-> 



(programmed by Envelope Generator) 



This is the basic format for programming a sound. Adding filters 
and ring modulators is like icing on the cake. We'll get to them later. 
For now, let's take a more in-depth look at how to program these meiin 
controls, which are the primary ingredients in our sound recipe. 
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7 Understanding the Power 
of the POKE Statement 



As you probably noticed from oxir sample programs in Section I, the 
POKE statement is the primary command used in music programming. 
The POKE statement instructs the computer to go to a specific control 
register or byte and enter a value. One way to understand this is to pic- 
ture the SID chip as the control panel of a synthesizer containing a 
number of dials. These control dials are called bytes, and each dial, or 
byte, has eight master settings, or bits. Each bit represents a value on 
the dial. By turning the dial to a setting, you get the value of the set- 
ting. It's not unlike turning the volume dial on your stereo. Using this 
analogy, the POKE statement becomes your hand reaching out and turn- 
ing the appropriate dial to the desired setting. 

A POKE statement is usuedly expressed as follows: 

100 POKE 54277,75 

The first number, 100, is the line number of your program. This is 
followed by POKE 54277, which instructs the computer to go to con- 
trol register number 54277. This number is known as an address. It is 
the location of a particuliir byte, in this case, the byte that controls the 
ATTACK/DECAY setting for Voice 1. 

The SID chip contains 29 of these control registers or bytes. If 29 
controls sound like a lot to handle, take heart. The first seven controls 
operate Voice 1. The next two sets of seven are duplicates of the first. 
They are used to control Voices 2 and 3. So when you know the first 
seven, you've already got a handle on 21. The remaining eight bytes con- 
trol various filter settings and Analog/Digital TA/D converters for in- 
terfacing the SID with external audio signals. We've provided you with 
a handy chart of "SID Chip Control Registers" at the end of this chapter. 
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After POKEing the address of the desired control, enter a comma, 
followed by a number from 0-255 inclusive. This mmiber represents the 
value that you are instructing the computer to enter onto the byte. By 
entering this value, you are, in effect, directly programming each of the 
eight bits contained on the byte. But, "why a number between and 
255?" you may ask. The reason is, we are using a programming language 
called BASIC. 

The purpose of this language is to act as an intermediary between 
human language and the computer's language. We use a nimiber system 
built around 10, the decimal system. The computer uses a system built 
around two, the binary system. We have 10 characters (0-9) with which 
to build our numbers, while the computer has two (0,1). The computer 
uses the to turn off a bit and uses a 1 to turn on a bit. When we tell 
the computer to POKE 54277,75, it will convert our 75 into binary, and 
use this number as a code to turn on and off the bits located at the byte 
with the address 54277. It would look like this: 
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That's because the decimal number 75 is the same as the binary number 
01001011. In this manner, our statement POKE 54277,75 turns on 
DECAY bits 0, 1, 3 and ATTACK bit 6, giving us a combination of 
three DECAY settings and one ATTACK setting. So you see, our number 
75 does a lot of work. 

It's very easy to learn how to make this conversion, so don't be alarmed. 
You don't have to be a math whiz: all you do is add. Follow this simple 
procedure, and youll be able to attain control of your sound settings 
in no time. 
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The chart above represents our control register. If you want to turn on 
a bit, just use the decimal number above the bit when entering your value. 
If you want more than one bit, just add. The computer will do the con- 
version for you. We used the number 75. That is made up of 64 + 8 
+ 2 + 1. If we wanted 76, then our register would look like this: 
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64 + 8 + 4 = 76 

So, why 0-255 inclusive? The reason is, you can encode combinations 
of these base two place values to obtain any number between and 255 
inclusive. Zero is the smallest (0 + + + + + + + = 
0), Two hundred fifty five is the largest because 1+2 + 4 + 8 + 
16 + 32 + 64 + 128 = 255. If you count the 0, that gives you 256 
possible ways to program the eight bits. This gives you a lot of control 
for your sound settings, and it's not that hard to manage. 

Here is a chart to aid you in this process. It shows the address number, 
and function of each control, and the value located on each bit. 



LO FQ = LOW FREQUENCY* 
HI FQ = HIGH FREQUENCY* 
LO PW . LOW PULSE WIDTH 
HI PW = HI PULSE WIDTH 
A = TRIANGLE WAVEFORM 
AVI = SAWTOOTH WAVEFORM 
rLn= PULSE WAVEFORM 



NOISE = WHITE NOISE WAVEFORM 
ATK-DEL . ATTACK/DELAY 
SUS-REL . SUSTAIN/RELEASE 
LO FC = LOW FREQUENCY CUTOFF 
HI FC = HI FREQUENCY CUTOFF 
RES-FILT = RESONANCE FILTER* 
VOL MODE = VOLUME FILTER MODE 



HP = HIGH PASS FILTER 
LP = LOW PASS FILTER 
BP = BAND PASS FILTER 
POT = POTENTIOMETER 
OSC 3 = OSCILLATOR 3 
ENV 3 = ENVELOPE 

GENERATOR 3 
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SID CHIP CONTROL CHART 





BIT no. 
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FUNCTION 
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f 6 


f 5 


f 4 


f 3 


f 2 


f 1 


f 


■] 
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HIFQ 
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f 14 


f 13 


f 12 


f 11 


f 10 


f 9 


f 8 


2 


54274 


LO PW 


pw 7 


pw 6 


pw 5 


pw 4 


pw 3 


pw 2 


pw 1 


pw 


3 


54275 


HI PW 


///// 


///// 


///// 


///// 


pw 11 


pw 10 


pw 9 


pw 8 


4 


54276 


WAVE FORM 


NOISE 
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AAA 




TEST 


RMOD 


SYNC 


GATE 


5 


54277 


ATK-DEC 


ATK3 


ATK 2 


ATK 1 


ATKO 
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DEC 1 


DECO 


6 


54278 
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RELO 
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pw 


10 


54282 
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///// 


///// 


///// 


///// 


pw 11 
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pw 8 


II 
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pw 
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ATK 1 
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DEC 1 
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54292 
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SUS 2 


SUS 1 


SUSO 
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fc 1 


fcO 
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fc 8 
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fc 4 
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RES 2 


RES 1 


RESO 


FILTEX 


FILT 3 


FILT 2 


FILT 1 
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8 Programming Pitch Controls 



As you will recall, one of the main functions of the oscillators is to 
produce a pitched tone. There are a number of ways to program the 
pitch controls of the SID. Each oscillator or Voice has two control 
registers, or bytes, that encode the pitch. In the Commodore 64 User's 
Guide, these are referred to as the Low Frequency and Hi Frequency 
numbers. This does not mean that a high frequency is encoded on the 
Hi Frequency number and a low frequency encoded on the Low Fre- 
quency number. It simply means that the number encoding the frequency 
may often be larger than 255, which is the largest number a byte can 
handle. Therefore, the entire nunaber is encoded as a 16-bit number, 
or two bytes. The Low Frequency number is the first half and the Hi 
Frequency number is the second half. 

By far, the easiest method for controlling the pitch is to use the Table 
of Note Values located in the User's Guide, Appendix M, or, for your 
convenience, Section VI of this book. The Table contains the Hi and 
Low Frequency numbers for 96 notes, or eight octaves, based on A = 
440, the standard concert A. A = 440 is listed as A4, which means that 
it is the A of the Fourth Octave. The table lists this note as Hi 28, Low 49. 

To encode this note for Voice 1, simply POKE 54273,28 and POKE 
54272,49. As you can see by looking at the SID Chip Control Chart, 
these POKE numbers refer to the address of the Pitch control registers 
for Voice 1 . If you wanted to encode this same note for Voice 2, you 
would POKE 54280,28 and POKE 54279,49. Similarly, Voice 3 would 
be POKE 54287,28 and POKE 54286,49. As you can see, the Pitch 
numbers remain the same for each voice. Using this method, you can 
accurately program the pitches for a song. We will show you how in 
Section III, "Programming A Song For One Voice." 
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For now, however, you may want to practice using the Table of Note 
Values. Here is a program that will make it easy. It is designed around 
an INPUT statement. The program will ask you to enter a Hi Frequen- 
cy number and a Low Frequency nimiber. Select a pitch from the Table, 
and enter the Hi and Low values. The program will automatically enter 
these values into Line 100, which POKEs the High and Low Frequency 
control registers for Voice 1 with your chosen pitch. You will then hear 
your note played by the computer. Try a few. 

5 REM *** HI LOW *** 

10 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 

20 PRINT CHR$(147) 

30 PRINT "ENTER NUMBER THEN HIT RETURN" 

40 PRINT "ENTER TO END" 

50 INPUT "HIGH FQ #";A 

60 IF A = THEN END 

70 INPUT "LOW FQ r;B 

80 POKE 54296,15 

90 POKE 54278,240 

100 POKE 54273, A : POKE 54272,B 

110 POKE 54276,17 

120 FOR T = 1 TO 1000 : NEXT 

130 POKE 54296,0 

140 GOTO 10 
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9 Advanced Pitch Control 
Techniques 



There may be times when you want to program a pitch that does not 
appear on the Table of Note Values. To do this, you must use a for- 
mula. This formula was used to compile the Table. 

The first step is to convert the actual frequency of the pitch (FA) to 
a frequency number (FQ). The formula for this is 

FA = .06097 = FQ. 

As an example, let's say we want to program A at 444 cycles per second 
instead of 440. We have to convert our actual frequency (FA), 444, 
to a frequency number. Using the Commodore as a calculator, divide 
the actual frequency 444 by .06097, and round off the answer. 

(FA) 444/ .06097 = (FQ) 7282.26997 

Rounded off, our frequency number is 7282. 

The next step is to convert the frequency number 7282 into a High 
Frequency number (HF), and a Low Frequency number (LF). 

To obtain the High Frequency number, use this formula: 

FQ/256 = HF and round off the number. 
Thus, 7282/256 = 28.4648438 HF = 28 
To obtain the Low Frequency number, use this formula. 
FQ - (256*HF) = LF and round off the number. 
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Thus, 7282 -(256*28) = 114 LF = 114. 



To encode your note for Voice 1 , POKE 54273,28; POKE 54272,1 19. 

This is an especially handy tool if you are interested in programm- 
ing music with different tuning systems for notes, as opposed to the 
standard convention of "Equal Temperament." It also gives you the 
ability to program quarter tones. 

This is an advanced technique that will be particularly useful to cer- 
tain people, but no one should be afraid to experiment. The real value 
of our computer lies in its capacity to create sounds not ordinarily 
heard. 

Another useful technique utilizes the fact that an octave vibrates 
at twice the speed as the octave below it. With this knowledge, you 
can construct a program that will generate the notes of all eight octaves, 
simply by encoding the Frequency numbers for the highest octave and 
dividing it by two the appropriate number of times. This is especially 
useful because of the computer's binary orientation. 

For an example of this technique, examine the program entitled 
"Nick's Scaler" in Chapter 2, Section I. 
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10 Controlling Waveforms 



Besides producing a pitched tone, the oscillators of the SID generate 
four waveforms. As discussed earlier, they are the Triangle, Sawtooth, 
Pulse, and White Noise waveforms. If you look at the SID Chip Con- 
trol Chart, you will see that each voice has its own waveform control 
register. The address number for Voice 1 is 54276; for Voice 2, it is 54283; 
and for Voice 3, 54290. Each of these three control registers or bytes 
can be thought of in this way: 



Dec. No. 


128 


64 


32 


16 


8 


4 


2 


1 


Function 


White 


Pulse 


Saw- 


Tri- 


Test 


Ring 


Sync 


Gate 




Noise 




Tooth 


Angle 




Mod. 




Bit No. 


7 


6 


5 


4 


3 


2 


1 






Each waveform works in coordination with the gate. To turn on a 
waveform, simply take the decimal niunber for the chosen waveform, 
and add it to the gate. Thus, a Triangle waveform can be selected by 
adding 16 + 1, or 17. Similarly, the Sawtooth is turned on by 33, Pulse 
by 65, and White Noise by 129. The gate is a very important element 
of this operation, because it acts as a trigger for the ADSR, or Envelope 
Generator. When the gate is opened, it signals the ADSR to begin its 
ATTACK/DECAY and SUSTAIN cycles. When it is closed, it signals 
the ADSR to begin its RELEASE cycle. For this reason, it is very im- 
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portant to set ttfe ADSR controls into your program ahead of the 
waveform. 

Let's return to our original sound program. 

5 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 
10 POKE 54296,15 
20 POKE 54277,0 : POKE 54278,128 
30 POKE 54272,28 : POKE 54273,49 
40 POKE 54276,17 
50 FOR T = 1 TO 900 : NEXT 
60 POKE 54276,16 

As you can see, we gated (turned on) the waveform in Line 40, after 
we had programmed the information for the ADSR in Line 20 and the 
Pitch in Line 30. Gating a waveform without this information is like 
opening your mouth and having no sound come out— you've got to tell 
your vocal chords to vibrate a message first. Line 50 sets the duration 
of the sound. Line 60 stops the sound (closes the gate) which begins the 
release of the envelope. 

The Triangle waveform produces a mellow, round sound. When used 
with the proper envelope, it is useful for producing sounds similar to 
those of a flute, an organ, or a French horn. 

The Sawtooth waveform is much brighter and edgier, useful for brass 
and reeds. 

The White Noise gives you a hissing sound, which can be refined to 
produce all kinds of sound effects such as explosions, hand claps, snare 
drums and rocket engines. The Pulse waveform is the most varied sound, 
because one can alter its harmonic content by controlling the pulse length. 
This also makes it the most difflcult to program. 



PROGRAMMING THE PULSE WAVEFORM 

As you may recall, the Pulse waveform is a rectangular shape. You 
can define the width of the pulse by programming two controls. If you 
take a quick look at the SID Chip Control Chart, you will see that the 
low and high pulse address numbers for Voice 1 are 54274 and 54275 
respectively. For Voice 2, they are 54281 and 54282, and for Voice 3, 
54288 and 54289. Together, these two controls form a 12-bit number. 
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The High Pulse number must be number (0-15), while the Low Pulse 
number must be (0-255). The easiest way to understand these settings 
is through experimentation. For this reason, we have supplied you with 
the following program. It is similar to the program we used for explor- 
ing the High and Low Frequency numbers. 

Well get you started by telling you that a setting of for the Low 
Pulse width number and 8 for the High Pulse width number will create 
a square wave. 

5 REM ♦*♦ HI LOW PULSE *** 

10 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 

20 PRINT CHR$(147) 

30 PRINT "ENTER NUMBER THEN HIT RETURN" 

40 PRINT "ENTER ( - 1) TO END" 

50 INPUT "HIGH PW#(0-15)";A 

60 IF A = - 1 THEN END 

70 INPUT "LOW PW # (0 - 255)";B 

80 POKE 542743 : POKE 54275,A 

90 POKE 54296,15 

100 POKE 54273,28 : POKE 54272,49 

110 POKE 54278,240 

120 POKE 54276,65 

130 FOR T = 1 TO 1000 : NEXT 

140 POKE 54276,64 

150 POKE 54296,0 

160 GOTO 20 

If you would like to experiment with how these waveforms sound, 
you can use any of the programs we've provided, and edit the program 
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line containing the POKE statement with the addresses 54276, 54283 
or 54290. Just change the waveform control number. Remember to 
POKE a High and Low Pulse Width command if you want to use 
the Pulse waveform. 

If you look at the Sid Chip Control Chart for the waveform control 
register you will notice that it also contains bits for the Ring Modula- 
tion and Synchronization functions. These functions work with the 
waveforms. We'll show you how they work in a later chapter devoted 
to Ring Modulation and Synchronization. 

The Test bit has a special function. When turned on, it resets the 
oscillator. You probably won't have to use this function if you follow 
one rule. TAKE CARE when adding waveforms. It is possible to add 
two waveform settings together. However, if you add a waveform while 
the white noise waveform is on, the output of the noise waveform may 
lock up. If this happens, the bit must be reset or it will remain silent. 
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11 Programming the ADSR 
Controls 



The Envelope Generator of the SID is one of the most powerful and 
unique controls. Each voice has its own Envelope Generator which is 
located on two bytes. The first byte contains the ATTACK/DECAY 
function while the second contains the SUSTAIN/RELEASE. If you 
examine the SID Chip Control Chart, it will reveal that the address for 
Voice 1 ATTACK/DECAY register is 54277. The address for the SUS- 
TAIN/RELEASE is 54278. For Voice 2, the register numbers are 54284 
and 54285. For Voice 3, the registers numbers are 54291 and 54292. 



Reg. #54277 
#52478 



Dec. No. 
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64 


32 
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Function 


At3 


At2 
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Dc3 


Dc2 


Del 


DcO 
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Su3 


Su2 
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Bit. No. 


7 


6 


5 
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3 


2 
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ATTACK Settings 

There are 16 possible ATTACK settings built around the numbers 0, 
16, 32, 64, 128. The other settings are derived by adding any combina- 
tion of these numbers. The maximum ATTACK setting is 240, while 
the minimum setting is 0. As you recall, the ATTACK controls how 
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rapidly a note will rise from zero to its peak volume. A setting of will 
result in the volume rising instantaneously to its peak volume. This is 
like an organ. As soon as you press the key, you get the maximum sound. 

A setting of 240 will give you a very slow and gradual rise to peak 
volume, while a setting of 128 will provide an intermediate rise. 

The ATTACK cycle begins when the waveform gate is opened. 

DECAY Settings 

Like the ATTACK function, the DECAY has 16 possible settings. 
These settings are based around the numbers 0, 1, 2, 4, 8. By adding 
any or all of these numbers, you can set the controls from to 15. The 
DECAY function has its parameters defined by the ATTACK and 
SUSTAIN. 

The DECAY controls how rapidly a note will drop from peak volume 
to a point defined by the SUSTAIN setting. A setting of will result 
in almost no DECAY. A setting of 15 will produce a long and gradual 
DECAY. 

COMBINING ATTACK and DECAY 

When you have selected your ATTACK and DECAY settings, you 
must then add them together and encode the sum as one number. For 
example, let's say you have selected a fast ATTACK of 16 and a medium 
DECAY of 5. You would then add them together; 16 + 5 = 31. They 
would then be inserted into the program with this statement. 

POKE 54277.31 

SUSTAIN Settings 

The SUSTAIN function uses the same decimal control numbers as 
the ATTACK: 0, 32, 64, 128. The SUSTAIN cycle of the ADSR 
follows the DECAY cycle and defines the lower end of the DECAY. 
It then SUSTAINS that volume level until the waveform gate is closed. 

A setting of will provide no SUSTAIN. This would be like a piano 
without a sustain pedal. The pitch simply fades away. A setting of 
128 would provide a sizable SUSTAIN. It would produce a volume 
function similar to applying the sustain pedal right after a note is struck. 
A setting of 240 produces the maximum SUSTAIN setting. 

RELEASE Settings 

The RELEASE cycle is triggered by the closing of the waveform 
gate. At this point, the volume of the note will drop from the SUSTAIN 
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level to zero at a rate defined by the RELEASE setting. These settings 
are built around 0, 1,2, 4, 8, again giving you a choice of to 15. A 

RELEASE Settings 

The RELEASE cycle is triggered by the closing of the waveform gate. 
At this point, the volume of the note will drop from the SUSTAIN level 
to zero at a rate defined by the RELEASE setting. These settings are 
built around 0, 1, 2, 4, 8, again giving you a choice of to 15. A setting 
of produces no release effect. This is also like an organ. As soon as 
you remove your finger from the key, the note ends. 

A setting of 15 gives the maximum release, producing an effect of 
the sound trailing away. 

Combining SUSTAIN and RELEASE 

To encode the SUSTAIN/RELEASE settings, follow the procedure 
used for the ATTACK/DECAY. Take the two settings and add them 
together. Thus a SUSTAIN setting of 128 and a RELEASE of 9 would 
be encoded as 137 and placed into the program as follows: 

POKE 54278,137 



Some Final Hints 

The real trick to using the ADSR is learning how the ATTACK/ 
DECAY/SUSTAIN/RELEASE all work together. Try to envision the 
envelope you want to create. Think about how the sound goes through 
its stages. Then try to create these stages using the settings. Often, drawing 
a diagram will be helpful in plotting out your sound. Here is a possible 
diagram for an organ-like envelope. 

ATTACK DECAY SUSTAIN 128 RELEASE 



SUSTAIN 



ATTACK RELEASE 
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Here is one for a harp. 



ATTACK 4 DECAY 15 SUSTAIN RELEASE 15 




Combined with the proper waveform, pitch range and sometimes with 
the help of filters, the ADSR plays a big role in the total sound produced. 

One final reminder on the ADSR. Always place the settings toward 
the beginning of your program before the waveform control settings. 
This way, when you open the gate and trigger the ADSR, the computer 
already has the envelope in its memory. 

If you would like to practice some ADSR settings, you can use the 
'Tour Envelopes" program in Chapter 4. This will allow you to pro- 
gram four groups of settings each time you run the program. Line 20 
of that program controls the ATTACK/DECAY and Line 30 controls 
the SUSTAIN/RELEASE. 

20 AD(0) = 144 : AD(1) = 8 : AD(2) = 65 : AD(3) = 
30 SR(0) = 243 : SR(1) = 9 : SR(2) = : SR(3) = 128 

By changing the values to the right of the equal sign, you can enter 
your new settings into an Array. Try it out. 
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12 Programming Volume 
Controls 



Of all the SID's sound controls, the volume is perhaps the easiest 
to control. It is located on Register 54296. It shares this byte with the 
filter mode. 



Reg. #34296 



Dec. No. 


128 


64 


32 


16 


8 


4 


2 


1 


Function 


Osc 

3 
Off 


BPF 


HPF 


LPF 


Vol 
3 


Vol 
2 


Vol 
1 


Vol 



Bit No. 


7 


^ 6 


5 


4 


3 


2 


1 






The volume is located on the first four bits. You can therefore pro- 
gram it with a number to 15, with 15 being the loudest settings and 
being the lowest. Set the volume at the beginning of your program. 

POKE 54296,15 

In most cases, the maximum setting of 15 is advised. This one volume 
setting will control all three voices during the course of your program. 
It is a good idea to end your program by setting the volume to 0. This 
will prevent an annoying buzz that often remains after a sound program 
ends. 
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13 Programming Note Duration 



There are a number of methods that you may employ to control the 
duration of a note. The simplest method is to use a time loop, as we 
did in our sample sound program at the beginning of this Section. The 
time loop is created by a FOR/NEXT statement placed between the com- 
mands that open and close the waveform gate. 

POKE 54276,17 

FOR DR = 1 TO 500 : NEXT 

POKE 54276,16 

The time loop instructs the computer to open the gate, wait for a time 
and then close the gate. You can lengthen the note by increasing the 
number within the loop. Thus FOR DR = 1 to 1000 would be twice 
as long as our original setting. Similarly, you can shorten the duration 
by decreasing the number within the loop. FOR DR = 1 TO 250 would 
produce a note with half a duration. 

By replacing the second number of the loop with a variable in a 
READ statement, and placing the value in a DATA statement, you 
can control the length of each individual note. We used this technique 
in several of our sample programs. We'll teach you how to use this 
method in the chapter devoted to Programming a Song for One Voice. 

Another easy method to control the duration of a note is to utilize 
the computer's "jiffy clock" which reads an interval timer. The "jiffy 
clock" is initialized to zero when the computer is turned on. It then 
increments by 1 every l/60th of a second. TI is a reserved system 
variable that contains the current value of the "jiffy clock." Start your 
program by setting the variable, TM in this case, equal to the Timer 
(TI). 

8 TM = TI 
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You can place the following statements into your program between 
the lines controlling the waveform gate to control the duration of your 
note. 

70 POKE 54276,17 
80 IFTKTM+10THEN80 
90 TM = TI 
100 POKE 54276,16 

Line 80 instructs the computer to wait until the computer time (TI) is 
10time intervals from where it begins before moving on to the 
next line. 

Line 90 resets TM to the clock. 

To increase the duration, increase the number added to TM. To 
decrease the duration, decrease the number. Thus TM + 20 is twice as 
long as the original setting, and TM + 5 is half as long. This method 
was employed in the program "Nick's Scaler" which appears in Chapter 
2. We will show you other ways to use the "jiffy clock" in later music 
programs. 
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SECTION III 




Programming Music Using the 
READ/DATA Format 



When programming music, you always want to bear in mind that the 
computer is your instrument as well as your composing sheet. The SID 
chip is the actual sound generating instrument. The BASIC program- 
ming language and the assembly language statements provide you with 
a number of different methods for encoding your music, and thus, act 
as your method of notation. The approach you employ for encoding 
your music is largely dependent upon the structure of the selected piece. 
Is it short or long? Does it use single or multiple voices? Are there many 
repetitions of small phrases, or relatively few repetitions? Is the tempo 
slow or fast? Do you want to control the duration of each note for each 
voice, or is unison the aim? These are all questions which you should 
consider when tailoring a specific music program. The answers to these 
questions will often determine your programming format. 

One function which your computer /instrument performs very well is 
organizing a collection of information, known as DATA, and present- 
ing it in whatever order you have programmed. This makes it particularly 
well suited to developing music, provided that you can convert musical 
ideas such as pitch and duration into DATA, and then structiu°e this 
DATA into a program that will present it in the proper order at the 
proper time. 

The BASIC language offers many tools with which to accomplish this 
task. Among them are the READ/DATA statement; the use of arrays; 
time loops; counters; conditional statements such as IF/THEN; flags 
(known as delimiters); and directional statements, such as GOTO. These 
are some of the most powerful tools of programming, and you may 
aheady be familiar with them. If you're not, we'll show you how they 
work. If you've worked with them before, we'll show you how they are 
used in music programming in coordination with the SID's sound 
controls. 
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14 READ/DATA Format 



One of the most useful methods of sound programming employs the 
READ/DATA format. This is an especially desirable format for use 
with short sound effects and simple songs. It is an easy procedure to 
modify our Sound Format Program, foxmd in the Introduction of Sec- 
tion II, into a READ/DATA format. 

Here is our original Sound Format Program. 

1 REM *** SOUND FORMAT *** 

5 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 

10 POKE 54296,15 

20 POKE 54277,0 : POKE 54278, 128 

30 POKE 54273,28 : POKE 54272,49 

40 POKE 54276,17 

50 FOR T = 1 TO 900 : NEXT 

60 POKE 54276,16 

Here is a modified version using the READ/DATA format. This 
program will play a simple C scale. 

1 REM*** READ/DATA FORMAT I*** 

5 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 

10 POKE 54296,15 

20 POKE 54277,0: POKE 54278,128 

25 READ H,L : IF H < THEN POKE 54296,0 : END 

30 POKE 54273, H : POKE 54272,L 

40 POKE 54276,17 

50 FOR T = 1 TO 900 : NEXT 
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60 POKE 54276,16 

70 GOTO 25 

100 DATA 16,195,18,209,21,31,22,96,25,30 

110 DATA 28,49,31,165,33,135, -1,-1 

Here is a line-by-line description of how this program works. 

S clears the sound chip. 
10 sets the master volume at 15. 
20 sets the ADSR controls for Voice 1. 

25 instructs the computer to READ the first two pieces of DATA in 
the DATA bank, and to call them H and L respectively. It then tells 
the computer to check the value of H and see IF it is less than ( < ) 
0. IF it is less than ( < ) 0, THEN the computer is instructed to END 
the program. IF it is not less than ( < ) 0, THEN the computer should 
proceed to the next line. 

30 POKES the High Frequency number register for Voice 1 with the 
current value of H, and POKEs the Low Frequency number register 
for Voice 1 with the current value of L. 

40 turns on the Triangle waveform and opens the Gate for Voice 1, 
triggering the ADSR cycle. 

50 plays the note for the duration encoded in the time loop. 

60 closes the Gate, triggering the RELEASE cycle and end of note. 

70 instructs the computer to GO back to Line 25 and begin, which will 
take the next two pieces of DATA in the DATA bank as H and L. 
100 DATA for the High and Low Frequency numbers for the notes C, 

D, E, F and G of the fourth octave. 
110 DATA for notes A, D and C, as well as the flag (delimiter) - 1. 

UNDERSTANDING THE LOOP 

Let's look more carefully at the loop that is set up between Lines 
25-70. As you can see, we have placed the READ statement in Line 
25. This begins a loop which will cycle between Line 25 and Line 70 
and then instructs the computer to return to Line 25. When placed 
in a program loop such as the one used here, the first two pieces of 
information will be READ by the computer in the order in which they 
appear in the DATA bank, which begins in Line 100. The computer 
will then assign these two pieces of information the variable names 
chosen in the READ statement. In this case, H and L will be assigned 
the values 16 and 196, respectively. The computer will then check to 
see if the value of H is less than 0. If it were, the computer would 
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end the program. In this case, the value is 16, so the computer will 
pass to the next line. 

In Line 30, the values of H and L are POKEd into the appropriate 
registers, thus defining the pitch C-4 as found in the Table of Note 
Values. The computer then passes on to Lines 40-60, which instruct 
it to play the note for the proper duration, and then to close the gate. 
Having satisfied these commands, the computer passes on to Line 70, 
where it receives the instruction to go back to Line 25 and READ the 
next two pieces of information. This time through the loop, the com- 
puter will pluck the next two pieces of information from Line 100, 
thus giving H and L the respective values 18 and 209, which are the 
frequency numbers for D. This information will be processed through 
the loop by the same procedure as before. Eventually, all the notes 
for a C scale will be READ and played. Finally, on the ninth pass 
of the loop, the computer will read the values - 1, - 1 for H and L. 
H will thus be less than (<) 0, so the program will end. 

FLAGS 

By placing a - 1 in the DATA bank, we have set up a "flag," or 
marker, also called a "delimiter." You will find these flags very useful 
for manipulating the DATA in your programs. They are also helpful 
as signals for the computer to break out of a loop. If we did not in- 
clude - 1, - 1 in our DATA as well as the conditional statement. IF 
H<0 THEN END in Line 25, the computer would have continued 
to READ DATA after the eighth note, and would have encountered 
nothing in the bank. It would then print OUT OF DATA ERROR 
IN 25. 

We'll show you other uses for delimiters in later programs. 
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15 Setting Up the DATA Bank 



There are a few simple rules that should be followed when setting up 
a DATA bank. The DATA bank is usually placed at the end of your 
program. 

The first step is to select a line number. In our case— the C scale pro- 
gram that appears in the previous chapter -the DATA bank begins with 
Line 100. This is followed by the statement DATA. At this point, you 
can enter the values you wish to be READ. Each value must be followed 
by a comma. In this way, the computer can differentiate each piece of 
information. 

A comma should not be placed after the final value entered on a DATA 
line. If you place a comma after the final value of a line, it will throw 
the computer out of sync and produce an ERROR statement. To see 
and hear the effects of this mistake, go to Line 30 of your program, 
and place a comma after the last value, which is 30, Then, press RETURN 
to enter the change. Now, RUN the program. Aside from the strange 
tones following the fifth note, you will also note ? ILLEGAL QUANTITY 
ERROR IN 30 printed at the bottom of your screen. 

The Commodore 64 can handle up to two full lines of values for any 
single DATA entry. It will automatically continue entering values on 
the second line if you overload the first. If you overload the second line, 
it wiU continue onto a third. However, all values entered on the third 
line will not be stored in the DATA bank. They will be entered as a 
new line, with the number of that line being the same as the next value 
in the DATA (which is the first value on the new line). This can be very 
damaging to your program if you aheady have a line with that number. 
For this reason, you should take care, when entering your DATA, not 
to enter more than two lines for any single line number. If you need 
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more space, type the next line number, followed by DATA, and con- 
tinue entering your values. 

Another rule that should be followed when compiling the DATA bank 
is always to include the same number of DATA values as asked for in 
the READ statement. For instance, our statement asks the computer 
to READ H and L. We must therefore include two minus ones ( - 1, 
- 1) at the end of our DATA. Otherwise, the computer will be looking 
for a value that is nonexistent, and will print an OUT OF DATA ERROR 
statement. 

All the DATA values in the bank are treated as a continuous list, and 
are READ left to right, from the lowest line number to the highest. 
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16 Duration Control Using the 
READ DATA Format 



We are not limited in the number and kind of values to be READ 
in any one statement. We can, for example, expand our present READ/ 
DATA format, from one that just READs a high and a low frequency 
number, to one that will READ a high and a low number as well as 
a duration number. In this manner, we may vary the duration of each 
pitch. 

1 REM **♦ READ/DATA FORMAT II *** 

5 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 
10 POKE 54296,15 
20 POKE 54277,0: POKE 54278,128 
25 READ H.L.DR : IF H < THEN POKE 54296,0 : END 
30 POKE 54273,H : POKE 54272,L 
40 POKE 54276,17 
50 FOR T = 1 TO DR : NEXT 
60 POKE 54276,16 
70 GOTO 25 

100 DATA 16,195,400,18,209,400,21,31,600,22,96,200,25,30,200 
110 DATA 28,49,200,31,165,200,33,135,1000, -1,-1,-1 

As you can see, our program is very similar. We have amended Line 
25 by adding an extra variable called DR for diu-ation. 

25 READ H,L,DR : IF H < THEN END 

We have also amended Line 50 and replaced the 900 with the variable 
DR, so that it now reads 

FOR T = 1 TO DR 
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You will also notice that we have added another - 1 to the flag. This 
is to compensate for the third value added to the READ statement. 

In this manner, we have replaced a constant duration value with 
a variable. This variable is encoded as every third value in the DATA 
statement. Thus, each time through the loop, the computer will place 
the new value of DR into the time loop. Since time is a proportional 
concept, we can create quarter notes, eighth notes, sixteenth notes, 
etc. by adjusting the length of the duration number. If 200 is used 
for a sixteenth note, then 4fX3 would be an eighth note, 800 would 
be a quarter note, and so on. That's because a sixteenth note is half 
the duration of an eighth note while an eighth note is half the dura- 
tion of a quarter note. 

A similar program using the "Jiffy Clock" to control duration can 
be created using this format. 

1 REM *** READ/DATA FORMAT II ♦** JIFFY CLOCK *** 

5 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 

7 TM = TI 

10 POKE 54296,15 

20 POKE 54277,0 : POKE 54278,128 

25 READ H.L.DR : IF H < THEN POKE 54296,0 : END 

30 POKE 54273,H : POKE 54272,L 

40 POKE 54276,17 

50 IFTKTM + DRTHEN50 

55 TM = TI 

60 POKE 54276,16 

70 GOTO 25 

100 DATA 16,195,25,18,209,25,21,31,45,22,96,15,25,30,15 

110 DATA 28,49,15,31,165,15,33,135,75, -1,-1,-1 

This program replaces the time loop with the "Jiffy Clock." This is 
accomplished by adding Line 7, TM = TI. This tells the computer 
to set the variable TM equal to the value of TI. TI is the BASIC 
numeric function which reads the current value of the interval times. 
Each 1/60 of a second, the interval times will increase by 1. By set- 
ting TM equal to TI, the computer will also increment TM by 1 as 
it increments TI. 
In Line 50 we add the conditional statement 

50 IFTKTM + DRTHEN50 

to replace our time loop. Now, the computer will add the value READ 
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as DR to the current value of TM, and remain on Line 50 until the 
interval timer. TI catches up to the new value of TM. When TI is 
no longer less than TM, the computer will go to Line 55 

55 TM = TI 

which will once again set TM equal to the current value of the timer. 

By placing our timer between Line 40, which turns on the note, and 
Line 60, which turns off the note, we can effectively control the dura- 
tion of the pitch. 

Once again, we use proportional values to create notes of different 
length. If 15 is a sixteenth note, then 30 is an eighth note and 60 is 
a quarter note. 
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17 The RESTORE Statement 



As discussed earlier, when READing DATA, the computer will always 
READ from left to right, from the lowest line number to the highest. 
It does this by maintaining an internal pointer to keep track of what 
to read next. Through the use of the RESTORE statement, we can reset 
this internal pointer back to the first piece of DATA. 

This capacity is particularly useful when we want to repeat a section 
of music. To see how the RESTORE statement works, let's add it to 
our Jiffy Clock program, by amending Line 25. The effect of this addi- 
tion will be the creation of a continuous loop. To break out of the pro- 
gram, press the RUN/STOP key and the RESTORE key. It should be 
noted that the RESTORE key has nothing to do with the RESTORE 
statement. The key will simply reset the computer to its original state. 
You can then re-LIST the program if you want to examine it. 

1 REM *** READ/DATA FORMAT II *** JIFFY CLOCK *** RESTORE 

5 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 

7 TM = TI 

10 POKE 54296,15 

20 POKE 54277,0 : POKE 54278, 128 

25 READ H,L,DR : IF H < THEN RESTORE : GOTO 25 

30 POKE 54273,H : POKE 54272,L 

40 POKE 54276,17 

50 IFTKTM + DRTHEN50 

55 TM = TI 

60 POKE 54276,16 

70 GOTO 25 

m DATA 16,195,30,18,209,30,21,31,45,22,96,15,25,30,15 

110 DATA 28,49.15,31,165,15,33,135,75, -1,-1,-1 
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As you can see, we altered the conditional statement in Line 25 to: 

25 READ H.L.DR : IF H < THEN RESTORE : GOTO 25 

The computer will ignore this statement until H is less than 0. When 
H is less than 0, it will reset the internal pointer to the first element 
on the DATA hst, go back to the beginning of Line 25, and READ 
the DATA once again. This creates our loop. 

This is useful for certain sound effects, but for playing music, we 
need more control of the DATA than just a repetitious loop. We can 
gain some of this control by using the RESTORE statement in coor- 
dination with counters. We will discuss the use of counters in the next 
chapter. 
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18 Using Counters 



Counters are used to keep track of how many times the computer 
has performed a particular task. When used in coordination with con- 
ditional statements, they become useful tools for the manipulation of 
DATA. If we add a counter to our last program, we can then use it 
with a conditional statement to play the scale as many times as we wish, 
and then to break out of the loop. The following example will play the 
scale three times and then END. 

1 REM *** READ/DATA FORMAT II *** JIFFY CLOCK »** RESTORE 
*** COUNTERS 

5 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 

7 TM = TI 
10 POKE 54296,15 
20 POKE 54277,0: POKE 54278,128 
25 READ H,L,DR: IF H<0 THEN 500 
30 POKE 54273,H : POKE 54272,L 
40 POKE 54276,17 
50 IFTKTM + DRTHEN50 
55 TM = TI 
60 POKE 54276,16 
70 GOTO 25 

100 DATA 16,195,30,18,209,30,21,31,45,22,96,15,25,30,15 
110 DATA 28,49,15,31,165,15,33,135,75,- 1, - 1,-1 
500 C = C+1 

510 IF C = 3 THEN POKE 54276,0 : END 
520 RESTORE : GOTO 25 
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In this program, we have again changed Line 25: 

25 READ H,L.DR : IF H < THEN 500 

Now when the computer encounters the flag - 1, it will go to Line 
500, where it will increment the counter. 

500 C = C+1 

The first time through, C is automatically equal to 0. Thus, the com- 
puter will convert the counter as follows: = 0+1, which means that 
the old C, which was equal to 0, is now the new C, which is equal to 1 . 

After incrementing the counter on Line 500, the computer moves 
on to Line 510, where it encounters a conditional statement: 

510 IF C = 3 THEN POKE 54296,0 : END 

At this point, C = 1; so the computer igiiores everything to the right 
of THEN, and passes on to Line 520. 

520 RESTORE : GOTO 25 

Now the computer resets the DATA pointer to the first element on 
the DATA list, and returns to Line 25 to start the process over. This 
time through the loop, when it is directed to Line 500, it will again 
increment the counter by 1. Thus, C = C + 1 is converted to 1 = 1 
+ 1. The C which was 1 is now 2. Once again the computer will pass 
by the conditional statement in Line 510 and RESTORE the DATA 
for another pass through the loop. 

Finally, on the third pass, the counter will be bumped up to 3. The 
conditional statement IF C = 3 will be fulfilled, and the computer 
will execute the commands to turn off the volume and end the program. 

You will find counters very useful in a variety of situations. We'll 
show you some of these uses in later programs. For now, however, 
let's move on and program a piece of music. 



54 



19 Programming A Song 
For One Voice Using 
READ/DATA Format 



Let's start our music programming with a song familiar to all. We've 
chosen "Oh, Suzannah," played on synthesized banjo. 
Here is the song in standard musical notation. 




Here is our program which will play this music. 

5 REM *** OH SUZANNAH BY STEPHEN FOSTER 

10 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 

20 POKE 54296,15 

30 POKE 54277,7 : POKE 54278,5 

40 READH,L,DR 

50 IFH<0THEN900 

60 POKE 54273,H : POKE 54272,L 

70 POKE 54276,33 

80 FORT = 1 TO DR : NEXT 
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90 POKE54276,32 

95 FOR B = 1 TO 34 : NEXT 

100 GOTO 40 

200 DATA 18,209.75,21,31,75,23,181,150.28,49,150,28,49,225,31,165,75 

210 DATA 28,49,150,23,181,150,18,209,225,21,31,75,23,181,150,23,181,150 

220 DATA 21,31,150,18,209,150,21,31,450,18,209,75,21,31,75,23,181,150 

230 DATA 28,49,150,28,49,225,31.165,75,28,49.150,23,181,150,18,209,225 

240 DATA 21.31.75,23,181.150.23,181,150,21,31,150,21,31,150,18,209,900 

250 DATA -1,-1,-1 

900 I = I + 1 : IF I = 2 THEN POKE 54296,0 : END 

910 RESTORE : GOTO 40 

Here is a line-by-line description of how this program works. 

5 Rem statement, title and composer. 

10 clears the sound chip. 

20 sets volume to maximum. 

30 sets ADSR A=0, D = 7, S = 0, R = 5; banjo effect for Voice 1. 

40 reads the high and low frequency numbers and the duration for each 
note. 

50 Conditional statement used to control DATA. 

60 enters the current value for high and low frequency into control 
registers for Voice 1. 

70 turns on sawtooth waveform and opens gate for Voice 1 . 

80 sets up a time loop for the duration of each note. 

90 turns off the note and closes the gate. 

95 estabUshes a second time loop which puts a small silence between 
each note to enhance the banjo sound and articulation. 

100 creates a loop by returning to Line 40 to read next note. 

200-240 DATA bank containing information for each note: first number 
represents high frequency, second is the low frequency, and third 
the duration. 

250 Flag to signal end of DATA. 

900 Counter: turns off the volume and ends the program on the second 
pass. 

910 restores the DATA and sends the computer back to Line 40 to restart 
the song. 

For this program, we used the READ/DATA format combined with 
time loop for the duration. The timing values were as follows: 

75 = sixteenth note 
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150 = eighth note 

225 = dotted eighth note 

300 = quarter note 

450 = dotted quarter note 

For the last note, we used a duration value of 900, simply because 
it sounds better. It's all right to break out of a strict niuherical inter- 
pretation of the time value. This will make your music sound more 
"human" and less "machine-like." As you become more familiar with 
programming music, it's a good idea to experiment with all your 
variables. This will give your music a more "personal" touch. 

Another little twist we added to this program was a second time 
loop in Line 95. Not only does this have the effect of slowing the en- 
tire program down, it also puts a space between the notes. Line 95 
adds only a thirty-second note to each duration which is not that 
noticeable. What it really does is separate the notes to make the ar- 
ticulation crisper, enhancing the overall banjo effect. When you have 
to describe a sound completely on the computer, many things that 
just happen when someone plays an instrument have to be worked 
into the computer description of each instrument. The numbers 1 to 
34 were chosen through experimentation: 50 was too slow, 25 was too 
fast. 

Finally, we used our flags, counter and RESTORE statement to 
manipulate the DATA. In this case, all we wanted was to repeat the 
entire DATA list and END. It is possible, however, to use these tools 
for more complex manipulation of DATA. To see how, take a look 
at the next chapter. 
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20 DATA Manipulation 
Using Flags, Counter, 
and RESTORE Statement 



It is probably dawning on you just about now that the main drawback 
in music programming is the quantity of numbers involved in setting 
up a DATA bank. There are, however, many tricks you can use to cut 
down on the number of notes you have to encode. 

In the READ/DATA format, there is some flexibility for ac- 
complishing this with the proper use of flags, counters, and the 
RESTORE statement. The chief disadvantage of this particular format 
is that you can only return to the beginning of the DATA list when you 
use the RESTORE statement. Still, it offers much in the way of a direct 
approach to programming while you are just starting out. Later on, well 
introduce you to the ARRAY format, which is more flexible in its ability 
to manipulate DATA, but a little harder to understand. The concepts 
that you will learn here, however, will be applicable to ARRAYS. 

The following program will serve to illustrate some of the possible 
techniques you can use to manipulate DATA. It is a beautiful melody 
by Robert Schumann from Opus 15, "Scenes From Childhood." Type 
it in on your Commodore, sit back, and take a listen. This program 
runs about two minutes. 
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5 REM *♦* SCHUMANN ♦♦* 

10 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 

20 POKE 54296,15 

30 POKE 54277,47: POKE 54278,136 

35 J = J + 1:I = 0:IFJ = 3 THEN POKE 54296,0 : END 

40 READH.L.DR: IF H<0 THEN 10001 

50 POKE 54273,H : POKE 54272,L 

60 POKE 54276,17 

70 FOR T = 1 TO DR : NEXT 

80 POKE 54276,16 

90 GOTO 40 

100 DATA 31,165,1200,50,60,1200,47,107,950,42,62,250,37,162,950,28,49, 
250 

110 DATA -1,-1,-1 

120 DATA 31,165,1200,50,60,1200,42,60,950,37,162,250,33,135,1200 

130 DATA 28,49,1200,37,162,1200,31,165,2400,- 1,- 1,- 1 

140 DATA31, 165,1200,33,135,1200,28,49,1200,31, 165,1200.25,30,1200,28, 
49,1200 

150 DATA 23,181,1200,25,30,1200,21,31,1200,23,181,1200,25,30,900,28,49, 

300 

160 DATA 31,165,10^01,33,135.300,37,162,1200,50,60,1200,47,107,900,42, 
62,300 

170 DATA 37,162,1200, -1,-1,-1 

1000 I = 1+ 1 : IF I + 1 THEN RESTORE : GOTO 40 

1005 IF I = 2 THEN 40 

1010 IF I = 3 THEN 40 

1015 IF I = 4 THEN RESTORE : GOTO 40 

1020 IF I = 5 THEN 40 

1030 IF I = 6 THEN RESTORE : GOTO 35 



As you can see, this program utilizes two counters: one in Line 35 
and one in Line 1000. It also uses three flags: the first in Line 100, 
the second in Line 130, and the third in 170. In addition, we use the 
RESTORE statement three times. 

To understand what all this is doing, let's take a look at the musical 
notation for this piece. 
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The numbers represent the measure number. The * represents the place- 
ment of a flag. 

This song contains 54 notes. That would require encoding 162 pieces 
of information, were we to encode the high and low frequency numbers 
and the duration of each note. In addition, if we wanted to play it 
twice, that would mean 324 entries. Obviously, this is undesirable. 
Looking carefully at the piece we can see that some of the music is 
used more than once. Using our counters and flags in coordination 
with the RESTORE statement, we can get this number down to about 
lfd0. If that still sounds to you like a lot of numbers, you are right. 
Turning the flow of electrons into real music is not the simplest of 
matters— lots of numbers are required, no matter what method you 
use. The payback comes from all the listening pleasure you and your 
friends will derive from the work. That doesn't mean, though, that 
you shouldn't try your hardest to cut down the number of entries you 
"have to" make. 

We set up two counters in this program. The first counter was set 
up in Line 35. 

35 J = J + 1:I = 0:IFJ = 3 THEN POKE 54296,0 : END 

This counter keeps track of how many times the piece is played. The 
first time through J = 1; the second time, J = 2. After completing 
the second pass, we go back to the counter a third time, and thus trig- 
ger the end of the song. 

We set up a second counter at Line 1000. This counter (I) works 
with the flags as set up in Line 40: 

40 READ H.L.DR : IF H < THEN 1000 
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This counter has been initialized at in Line 35. We use this counter 
to keep track of our flags. 

The next step is to eliminate as many repetitious phrases as possible, 
always keeping in mind that once we use the RESTORE statement, 
we will be back at the beginning of our DATA list. Studying the musical 
notation, we see that measures 3 and 4 are identical to measures 1 
and 2. Also, measures 17-22 are identical to measures 3-8. With this 
knowledge, we can eliminate 20 notes, or 60 DATA entries. DATA 
Lines 100-110 contain the information for measures 1 and 2, follow- 
ed by a flag - 1, - 1, - 1. When the computer sees the flag, it goes 
to Line 10^0. The counter (I) is now 1, so the computer follows the 
command for 1. It RESTORES the DATA, and goes back to Line 
40, where it will re-READ the list. In this manner, we have eliminated 
the necessity of encoding measures 3 and 4. 

The next time the computer arrives at the flag in Line 110, it is again 
directed to Line 1000. This time, the counter (I) is 2, so the computer 
follows the command for 2 in Line 1005. As you see, the DATA is 
not restored this time through. This means that the computer will con- 
tinue reading the DATA at the point it last left off (Line 120). In this 
manner, we can place a flag in the DATA and use it several times, 
having it perform a different function each time. 

The computer arrives at its next flag in Line 130, which is the end 
of measure 8 in the musical notation. The counter is moved up to 3, 
and the computer is again directed to go back to Line 40 and to con- 
tinue READing DATA for measure 9 (Line 140). 

In DATA Line 170 the next flag is registered, bumping the counter 
up to 4. We are now at measure 17 of the music. Here is our chance 
to eliminate encoding measures 17-22. We do this by RESTOREing 
the DATA and returning to the beginning of our list. Keep in mind 
that we wish to duplicate measures 3-8, and not measures 1 and 2. 

This is accomplished when we arrive once again at our flag in Line 
110. This time, the counter moves to 5, and the computer receives the 
instruction to keep READing. It does so until it reencounters the flag 
in Line 130. At this point, we are at the end of measure 22 in the music. 

Our counter is now at 6. We have played the song once through, 
and it's time to tell the computer to play it again. We accomplish this 
by redirecting it, back to Line 35. At Line 35, our counter (J), which 
keeps track of the number of times we play the song, is bumped up 
to 2. Our counter (I) is reset to 0, and we begin the whole process over. 

When we arrive at Line 1030 for the second time, the computer is 
directed to go to Line 35. The counter (J) is moved up to 3. The volume 
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is turned off, and the program ENDs. 

If you are having any problems understanding these new concepts, 
take heart, and above all, don't give up. It often takes a while to ab- 
sorb a new idea completely. If you need a break, take one, and let 
the ideas roll around for a while. If you'd Uke, skip ahead to some 
of the sound effects, and have a few laughs. 



62 



21 Shortcuts and Abbreviations 



When you are typing in your programs, you will probably want to 
save as much time as possible. For this reason, we are going to introduce 
a few time-saving conventions. 

The fipt convention is the use of abbreviations. The Commodore 64 
allows you to abbreviate many key words in the BASIC programming 
language. A complete list may be found in Appendix D of the Com- 
modore User's Guide. An abbreviation is usually accomplished by typing 
the first letter of the command followed by a shifted second letter. Thus, 
POKE is abbreviated with a P and a shifted O. The shifted letter will 
appear on the screen as the graphics symbol located on the right of the 
front face of the letter key. A shifted O would therefore appear as an 
inverted L. 

The advantage of the abbreviation is that it saves time and space. When 
the program is listed, the abbreviated command will appear in its full 
spelling. The abbreviation for DATA, for example, D and shifted A, 
will appear as the full word DATA when the program is listed. You 
must take care to leave space at the end of your second DATA line if 
you use the abbreviated form. The space must be enough to accommodate 
the fully written conunands. Otherwise, you might lose a few elements 
in your list. 

Other abbreviations you may find useful are RE (shifted) S for 
RESTORE; and L (shifted) I for LIST. 

The second time-saving convention you may find helpful is the use 
of initialization. Start your program by assigning the number 54272 to 
a variable such as M. The number 54272 is the number of the first register 
in the sound chip. Thus, if M = 54272, then M + 1 would equal 54273. 
Similarly, M -I- 24 would equal 54296. In this way, you can cut down 
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on the length of your POKE addresses. If you look at your SID Chip 
Control chart, you will see that we have provided you with a complete 
list of abbreviated numbers in the first column. Use the chart as follows: 
begin your program with an initialization. 

M = 54272 

Then, if you want to POKE a specific address, look for the number 
on the chart. 

For example, POKE M + 11 , 17 would POKE the waveform con- 
trol register for Voice II with the triangle waveform. Similarly, POKE 
M + 24, 15 would set the volume to its maximum setting. 

We will be using this convention often in the following chapters. 
After a while, you won't have to look at the chart, since you will 
remember the code. 

One last time-saving tip: make a master program for each music 
format and keep it on file. Then, when you want to program a piec^ 
just load it in and fill in whatever variables for waveform, ADSR, 
etc. you wish. Then, it's a simple matter of entering your new DATA 
and whatever commands are necessary for its manipulation. 

Why not try out these techniques on the next program? It's for a 
simple bass line. 

10 REM *** JAZZ BASS LINE *»* 

20 FOR Z = 54272 TO 54296 : POKE Z.0 : NEXT 

30 M = 54272 

40 POKE M + 24, 15 

50 POKE M + 5,9: POKE M + 6,15 

55 J = J + l:IFJ = 3THENFORT= 1 TO 1000 : NEXT : POKE M + 24,0 
:END 

60 READH,L,DR:IFH<0THEN500 

70 POKE M + 1,H: POKE M,L 

80 POKE M + 4,33 

90 FOR Q = 1 TO DR : NEXT 

110 POKE M + 4,32 

115 FOR T = 1 TO 300 : NEXT 

120 GOTO60 

200 DATA 3,244,25,4,180,25,5,71,150,4,180.200 

210 DATA 3,244,25,4,18i0,25,5,71,150,4.180,100,4,180,100,l,- 1,-1 

220 DATA 5,71,25,6,71,25,7,12,150,6,71,200 

230 DATA 5,71,25,6,71,25,7,12,150,6-,71,100,6,71,100,- 1,-1,-1 
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500 C = C + 1 : IF C = 1 THEN RESTORE : GOTO 60 

510 IFC = 2THEN60 

520 IF C = 3 THEN RESTORE : GOTO 60 

530 IF C = 4 THEN RESTORE : C = : GOTO 55 



22 Multiple Voice Programming 
Using the READ/DATA 
Format 



Now that you are familiar with some of the music programming tech- 
niques for one voice, it's a simple matter to get all three working for 
you. Here is a program that will demonstrate the 64's ability to pro- 
duce music with three part harmony. For this program, we use the 
READ/DATA format combined with the "Jiffy Clock." You will notice 
that we have provided a separate DATA line for each of the song's thirty- 
six notes. Although this is certainly not necessary, it does provide for 
a certain amount of clarity. Another advantage of this method is that, 
should you enter a wrong value in your DATA, it is a simple matter 
to locate the error. 

1 PRINT "H" : REM *** CLEAR SCREEN *** 

5 PRINT "SWING LOW SWEET CHARIOT (TRAD)" 

10 PRINT "MUSIC ARRANGED BY JIM VOGEL" 

100 M = 54272 

110 POKE M + 24,15 

120 POKE M + 5,9 : POKE M + 6,0 

130 POKE M + 12,26 : POKE M + 13,36 

140 POKE M + 19,24 : POKE M + 20,202 

150 T = TI 

160 POKE M + 4,32 : POKE M + 1 1 ,32 : POKE M + 1 8, 16 

170 READ X : IF X<0 THEN 690 
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180 READH1,L1,H2.L2.H3,L3 
190 POKE M + 1 ,H1 : POKE M.Ll : POKE M + 4,33 
2001 POKE M + 8,H2 : POKE M + 7,L2 : POKE M + 11 ,33 
210 POKE M+ 15,H3 : POKE M+ 14,L3 : POKE M + 18,17 
220 T = T + X 

230 IF T>TI THEN GOTO 230 
240 GOTO 160 

300 DATA 30,28,49,33,135,5,152 

310 DATA 60,22.96,14,24,0,0 

320 DATA 30,28,49,33,135,5,152 

330 DATA 45,22,96,29,223,9,104 

340 DATA 15,22,96,0.0,0,0 

350 DATA 15.18,209.29,223.0.0 

360 DATA 45,16.195,10,143.6.71 

370 DATA 15,22,96,16,195,7,12 

380 DATA 15,22.96,11,48,0,0 

390 DATA 15,22,96,14,24,9.104 

400 DATA 15,22,96, 1 1 ,48,0,0 

410 DATA 15,28,49,21,31,8,97 
420 DATA 15,33,135,0,0,0,0 
430 DATA 30,33,135,21,31,7,12 
440 DATA 30,33,135,22,96,8,97 
450 DATA 30,0,0,0,0,18,209 
460 DATA 30,0,0,21,31,16,195 
490 DATA 30,0,0,0,0,14,239 
500 DATA 15,37,162,22.96,14.24 
510 DATA 15,33,135,0,0,14.24 
520 DATA 60,28,49,0,0,16,195 
530 DATA 30,33,135,22,96,9,247 
540 DATA 45,22,96.14.239.9.104 
550 DATA 15.22.96.14,239,9,104 
560 DATA 15,18,209,0,0,0,0 
570 DATA 45,16,195,14,239,10,143 
580 DATA 15,22.96.16,195.11,48 
590 DATA 15,22.96.0.0,0,0 
600 DATA 15,22,96.18,209.9.104 
610 DATA 15.22.96,0,0,0.0 
620 DATA 15.28.49.18,209,7,119 
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630 


DATA 15,28,49,0,0,0,0 


640 


DATA 30,25,30,14,239,8,97 


650 


DATA 30,22,96, 14,24, 1 1 ,48 


660 


DATA 30,0,0,0,0,8,97 


670 


DATA 30,0,0,0,0,5,152 


680 


DATA - 1 


690 


C = C+1:IFC = 2 THEN 1000 


im 


RESTORE 


710 


FOR J = TO 200 : NEXT 


720 


GOTO 150 


m 


FOR Z = M TO 54296 : POKE Z,0 : NEXT Z 



Here is a line-by-line description of how this program works. 

1-5-10 set up the screen display. 
100 initializes M to 54272. 
1 10 turns on the volume. 

120-140 sets the ADSR of voices 1-3 respectively. 
150 sets T equal to the value of the "Jiffy Clock." 
160 sets the waveforms for voices 1-3 respectively. 
170 READS the duration value X and checks if it is less than 0. If it 
is, the computer is instructed to go to Line 690. 

180 READs the high and low frequency numbers for voices 1-3 
respectively. 

190-210 POKES the high and low frequency numbers into the 
appropriate registers for voices 1-3. It also turns on the waveform 
by opening the gate. 

220 adds the duration value X to the variable T. 

230 holds the note on until the Jiffy Clock catches up to the new value 
of T. 

240 creates the loop by going back for the next note. 

300-680 contain the DATA. The first piece of information is the 

duration value. The next sue are the high and low frequency numbers 

for voices 1-3. 

690 sets up the counter for how many times the piece will be played. 
100 restores the DATA. 

710 creates a silence before going on to the next line by using a loop. 
720 creates a loop to play the song again. 
1000 turns off the chip. 
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With the ability to create harmony through the use of multiple voices, 
your music will take on a new richness and color that was not present 
with just one voice. 

You will find the method used in this program useful for many types 
of musical statements. Its one major drawback, however, is that it 
does not provide for independent control of the duration for each voice. 
You must, therefore, construct your programs with this in mind. All 
these voices must play for the same duration simultaneously. In other 
words. Voice 1 cannot play a quarter note at the same point in the 
program that Voices 2 and 3 are producing eighth notes. You can, 
however, create the illusion of truly independent voices by turning dif- 
ferent voices on and off at different times during the program. This 
is done quite simply, by entering zeros for the high and low frequency 
numbers of the voices you wish to remain silent. The effect will be 
that of independent movement. 

We have provided you with a more sophisticated program (in Sec- 
tion V) that will enable you to achieve true independent control of 
multiple voices. If you are curious, skip ahead and take a look. 

Here is another program which is similar to the one you just typed in. 

1 PRINT "H" : REM *** CLEAR SCREEN *** 

5 PRINT " > > JOSHUA FOUGHT THE BATTLE OF JERICHO < < " 

10 PRINT " > > > > MUSIC ARRANGED BY JIM VOGEL < < < < " 

100 M = 54272 

110 POKEM + 24,15 

120 POKE M + 5,9: POKE M + 6,0 

130 POKE M+ 12,26: POKE M+ 13,36 

140 POKE M + 19,16 : POKE M + 20,240 

150 T = TI 

160 POKE M + 4,32 : POKE M + 1 1,32 : POKE M + 18,16 

170 READX:IFX<0THEN900 

180 READH1,L1,H2,L2,H3,L3 

190 IFHl THEN POKE M + 1, HI : POKE M,L1 : POKE M + 4,33 

200 IF H2 THEN POKE M + 8,H2 : POKE M + 7,L2 : POKE M + 1 1 ,33 

210 IF H3 THEN POKE M+15,H3 : POKEM+14,L3 : POKEM+18,17 

220 T = T + X 

230 IF T>TI THEN GOTO 230 

240 GOTO 160 

300 DATA 10,18,209,0,0,0,0 
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310 DATA 10,17,195,0,0,8,225 

320 DATA 10,18,209,0,0,9,104 

330 DATA 10,21,31,0,0,10,143 

340 DATA 10,22,96,0,0,11,48 

350 DATA 10,22,96,0,0,11,48 

360 DATA 20,25,30,0,0,12,143 

370 DATA 10,28,49,18,209,11,48 

380 DATA 20,22,96,0,0,0,0 

390 DATA 40,28,49,18,209,1 1,48 

400 DATA 20,0,0,0,0,7,12 

410 DATA 10,25,30,17,195,10,143 

420 DATA 20,25,30,17,195,10,143 

430 DATA 40,25,30,17,195,10,143 

440 DATA 20,0,0,0,0,7, 1 12 

450 DATA 10,28,49,18,209,11,48 

460 DATA 20,28,49,18,209,11,48 

490 DATA 35,28,49,18,209,11,48 

500 DATA 5,0,0,0,0,7,12 

510 DATA 5,0,0,0,0,7,233 

520 DATA 5,0,0,0,0,8,225 

530 DATA 10,18,209,0,0,9,104 

540 DATA 10,17,195,0,0,8,225 

550 DATA 10,18,209,0,0,9,104 

560 DATA 10,21,31,0,0,10,143 

570 DATA 10,22,96,0,0, 1 1 ,48 

580 DATA 10,22,96,0,0,11,48 

590 DATA 20,25,30,0,0,12,143 

600 DATA 10,28,49,18,209,11,48 

610 DATA 20,28,49,18,209,11,48 

620 DATA 30,28,49,18,209,11,48 

630 DATA 10,22,96,0,0,11,48 

640 DATA 10,25,30,0,0,10,143 

650 DATA 20,28,49,22,96,9,104 

660 DATA 20,25,30,21,31,8,97 

670 DATA 10,22,96,18,209,7,119 

680 DATA 10,22,96,0,0,0,0 

690 DATA 20,21,31,17,195,7,12 

700 DATA 30,18,209,14,24,9,104 
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710 DATA 20,0,0,0,0,7,12 

720 DATA 30,0,0,0,0,4,180 

730 DATA - 1 

900 C = C+1 : IFC = 2THEN 1000 

910 RESTORE 

920 FOR J = 1 TO 200 : NEXT 

930 GOTO 150 

1000 FOR Z = M TO 54296 : POKE Z,0 : NEXT Z 

The major difference between this and the previous program lies 
in Lines 190-210. 

190 IF HI THEN POKE M+ 1,H1 : POKE M,L1 : POKE M + 4,33 
200 IF H2 THEN POKE M + 8,H2 : POKE M + 7,L2 : POKE M + 1 1 ,33 
210 IF H3 THEN POKE M + 15,H3 : POKE M + 14,L3 : POKE M + 18,17 

As you can see, we have now made these lines into a conditional 
command. If the computer reads a zero value in HI, it immediately 
goes on to line 200. This is because the computer treats the zero in 
the statement as no value. If HI does have a value, however, the com- 
puter will execute the remainder of the line before passing onto line 200. 

You may wish to save the first section of this program— up to Line 
230— and use it as a template for your own future programs. 
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SECTION IV 




Sound Effects, Ring Modulation, 
Synchronization, Filters, 
and Frequency Modialation 



One of the truly entertaining aspects of the SID is its ability to create 
sound effects. This is one area of sound generation which can really call 
into play many of the 64's unique capabilities. You can, for instance, 
incorporate the 64's ability to generate random numbers into a sound 
effects program, as weVe done in the program "Insect Speech." You 
can also utilize the 64's STEP function to create a program that will 
"scoop" pitch, producing glissando and siren-like soimds. All sorts of 
interesting effects may be created through the use of the SID's Ring 
Modulator and Synchronization bits. In addition, the sometimes unruly- 
sounding waveforms can be molded into a more sophisticated sound 
through the use of the three filters and resonator bits of the SID. Finally, 
you can utilize these effects as sub-routines, or incorporate them into 
the main body of video programs to add another dimension to your com- 
puter art or games. 

Let's move ahead and learn how all this can be done. 
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23 Phaser and Siren Sound 
Effects Using the STEP 
Command 



The STEP statement is a very useful BASIC command in sound ef- 
fects progranmiing. The STEP command is used in conjunction with 
a FOR/NEXT loop. Normally, a FOR/NEXT loop, such as: 

FOR T = 1 TO 100 : NEXT 

will increment by one each time through the loop. With the addition 
of the STEP statement, we can increment the counter by whatever value 
we choose. For example: 

FOR T = 5 TO 50 STEP 5 : NEXT 

will loop ten times— progressing from 5 to 50 by "steps" of 5. The in- 
crement occurs each time the computer encounters the NEXT. 
With this in mind, take a look at our first sound effect. 

5 REM ♦** GLISS EFFECT *** 

10 FOR M = TO 24 : POKE 54272 + M,0 : NEXT 

20 M = 54272 

30 POKE M + 24,15 

40 POKE M + 5,136: POKE M + 6,240 

50 FOR X = 4 TO 255 STEP 2 

60 P0KEM+1,X 

70 POKE M + 4,17 

80 FOR K = 1 TO 4 : NEXT K : NEXT X 
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200 C = C+1 :IFC = 3THEN500I 

210 GOTO 50 

5(2(0 POKE M + 24,0: END 

This program will create a scooping of pitch effect, also known as a 
glissando. In this program, the pitch will scoop upward. 
Here is a line-by-line description. 

10 clears the chip. 
20 initializes M to equal 34272. 
30 turns on the volume. 
40 sets the ADSR. 

50 assigns the variable X to every other value between 4 and 255. 

60 takes the current value of X and POKEs it into the high frequency 
number register of Voice 1. 

70 turns on the waveform and opens the gate. 

80 sets up a time loop of 1 to 4— then loops back for the. next X. 
200 establishes the counter -IF 3 THEN END the program. 
210 instructs the computer to go back to 50 and do it again. 
500 turns off the volume. END. 

You will notice that in creating this effect, we changed a few rules. 
We did not, as has been our custom, utilize both the high and low fre- 
quency numbers. That is because we were not interested in creating a 
specific pitch, such as A-440, which requires two numbers. You can use 
the high frequency register alone to produce pitched notes if you are 
not concerned with exact interval relationships. Using the low frequen- 
cy register alone, however, is not advisable because it produces very lit- 
tle sound. 

You will also notice that, while we turned on the waveform and opened 
the gate, we never closed it with a 16. This choice produces a constant 
on soimd of the program. This is also why our SUSTAIN/RELEASE 
setting is set at 240, maximum SUSTAIN and no RELEASE. Since the 
RELEASE cycle of the ADSR is triggered by the closing of the gate, 
no setting we might have used would ever have had a chance to func- 
tion. So, even though there are many notes produced, the effect is one 
of continuous sound getting higher and higher, which is repeated twice. 

The most important point to grasp, however, is oiu" use of the STEP 
command. Each value of X that was obtained from the loop was POKEd 
into the low frequency register: the first time a value of 4, then 6, then 
8, etc. This is the element of the program responsible for the gradual 
rise in pitch. 
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We can also invert the STEP command by using negative numbers. 
For example: 

FORT = 50 TO 5 STEP -5 : NEXT 

will loop ten times, creating the values 50,45,40,35, etc. for the variable 
T. We used this technique in the following program. 

5 REM *** GLISS EFFECT *** 
10 FOR M = TO 24 : POKE 54272+ M,0 : NEXT 
20 M = 54272 
30 POKE M + 24,15 
40 POKE M + 5,136 : POKE M + 6,240 
50 FOR X = 255 TO 4 STEP -2 
60 POKEM+l,X 
70 POKE M+ 4, 17 

80 FOR K = 1 TO 4 : NEXT K : NEXT X 
200 C = C+1 :IFC = 3THEN50EI 
210 GOTO 50 
500 POKE M + 24,0: END 

This program is identical to the one for our first effect, with one altera- 
tion, in Line 50: 

50 FOR X = 255 TO 4 STEP - 2. 

This line is responsible for our pitch descending instead of ascending 
as in the previous program. 
You can combine these two programs to produce a "siren-like" effect. 

5 REM *** SIREN EFFECT *** 

10 FOR M = TO 24 : POKE 54272 + M,0 : NEXT 

20 M = 54272 

30 POKE M + 24,6 

40 POKE M + 5,136: POKE M + 6,240 

50 FOR X = 4 TO 255 STEP 1 

60 POKEM+l,X 

70 POKE M+ 4,33 

80 FORK = 1T06:NEXTK:NEXTX 

90 FOR Z = 255 TO 6 STEP - 1 

100 POKEM+l,Z 

110 FOR J = 1 TO 4 : NEXT J : NEXT Z 
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200 C = C+1 : IFC = 3THEN500 

210 GOTO 50 

500 POKE M+ 24,0: END 

Still another effect that may be obtained through the use of the STEP 
statement is the "Phaser" effect. 

5 REM *** PHASER EFFECT »*• 

10 FOR M = TO 24 : POKE 54272 + M,0 : NEXT 

20 M = 54272 

30 POKEM + 24,15 

40 POKEM + 5,136:POKEM+6,255 

50 POKE M +4,17 

60 FOR K = 1 TO 15 

70 FOR Z = 250 TO STEP -20 

80 POKEM+l.Z 

90 NEXT Z: NEXT K 

100 POKE M + 4,16 

500 POKE M + 24,0: END 

This program produces the sound of a Sci-Fi space weapon, by pro- 
ducing a sputtering effect —caused by a - 20 STEP created in Line 70, 
as well as by opening and closing the waveform gate. 
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24 The White Noise Effect; 
Blast Off and Locomotive 



The easiest effect to produce on the 64 is the White Noise effect. Simply 
POKE 129 into the waveform register. You can use the White Noise 
waveform for explosions, bombs, gunfire, and all sorts of havoc. 

Here is just one example of its many uses -it dramatizes well the power 
of the White Noise. It's called "Blast Off." Once again, we utiUze the 
Nick's Scaler Program; only this time we make two simple changes. In 
Line 40, we changed the triangle waveform of 17 to a white noise 
waveform of 129. In Line 80 we cut down the timer from TM+ 10 to 
TM + 2. The result is quite startling. Our eight-octave chromatic scale 
turns into a rocket blasting off and finally trailing away into space! (Note: 
when used in a program, % means integer.) 

1 REM *** BLAST OFF BY J.C.VOGEL& NICK 

5 FOR Z = 54272 TO 54296 : POKE Z.0 : NEXT 

10 FORI = 0TO7 

20 POKE 54296,15 

30 POKE 54277,0 : POKE 54278,240 

40 POKE 54276,129 

50 READ A : IF A = - 1 THEN GOTO 900 

60 A = A/2 t I 

70 L«7o = A/256 : HVo = A-(256*L"%) 

80 IF TI< TM + 2 THEN 80 

90 TM = TI 

100 POKE 54273,L% : POKE 54272,H<% 
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110 GOTO 40 

200 DATA 64814,61176,57743,54502,51443,48556,45830,43258,40830,38539, 

36376,34334 
800 DATA - 1 
900 RESTORE 

910 NEXT I : FOR T = 1 TO 3000 : NEXT : POKE 54296,0 
920 END 

Here is a White Noise effect that creates the sound of a locomotive. 

50 REM **• LOCOMOTIVE •** 

100 M = 54272 

1 10 FOR Z = 54272 TO 54296 : POKE Z,0 : NEXT 

120 FOR J = 1 TO 40 

130 POKEM + 24,15 

140 POKE M + 5,8 

150 POKE M+ 1,20 

160 POKE M + 4, 129 

170 FOR Q = 1 TO 50 : NEXT Q 

180 POKEM + 4,128 

190 NEXT J 

200 POKE M + 24,0 

For this effect, we used a nested loop. Line 20 creates a loop that 
makes the entire effect play 40 times while Line 170 controls the dura- 
tion for each chugging sound. This chugging sound is created by us- 
ing a low ATTACK number (Line 140) with no SUSTAIN, combined 
with the noise waveform. 

White Noise effects can vary greatly when filtered through a high 
pass filter. We'll show you how to set these filters in Chapter 28, "Pro- 
gramming Filters." 
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25 Sound and Color 



One of the most common audio effects wafting out of the halls of 
video arcades soimds like this: 

5 REM *** VIDEO GAME EFFECT *** 

10 FOR M = TO 24 : POKE 54272 + M,0 : NEXT 

20 M = 54272 

30 POKEM + 24,15 

40 POKEM + 5,136: POKE M + 6,240 

50 FOR X = 4 TO 255 STEP 25 

60 POKEM+l,X 

70 POKE M + 4,33 

80 FOR K = 1 TO 10 : NEXT K : NEXT X 

90 FOR Z = 255 TO 6 STEP -25 

100 POKEM+l,Z 

110 FORJ = 1T0 2:NEXTJ:NEXTZ 

im C = C+l : IFC = 3THEN500 

210 GOTO 50 

500 POKE M + 24,0 : END 

Similar in form to our "Siren" program, this one creates a completely 
different effect. You can get a lot of mileage out of using a simple 
STEP command, and varying the length of your time loop. 

It is important to remember, though, that using time loops ties up 
the computer on the lines executing the loop. When incorporated in- 
to video programs, this may not always be desirable. (You may have 
noticed that, on many video games, the action freezes when the sound 
comes on. Now you know why.) When the time loop causes such a 
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problem, we suggest you use the Jiffy Clock. Using the clock allows 
you to go off and check conditional statements and then return to 
check the clock. 

Here is one way that you might insert this sound program into a 
game. Our intention here is merely to show you the technique of in- 
tegrating sound with simple graphics commands. 

4 PRINT"®": REM** CLEAR SCREEN*** 

5 REM *** VIDEOGAME EFFECT **♦ 

10 FOR M = TO 24 : POKE 54272 + M,0 : NEXT 

20 M = 54272 

30 POKE M + 24,15 

40 POKE M + 5, 1 36 : POKE M + 6,240 

50 FOR X = 5 TO 255 STEP 20 

60 POKEM+l,X 

70 POKE M + 4,33 

80 FOR K = 1 TO 15 : NEXT K : NEXT X 

90 FOR Z = 255 TO 6 STEP - 20 

100 POKEM+l,Z 

110 FORJ = 1T012:NEXTJ:NEXTZ 

200 C = C+1 : IFC = 5THEN500 

205 POKE 53281 ,2 : FOR T = 1 TO 75 : NEXT 

206 POKE 53281,11 
210 GOTO 50 

500 PRINT "*** 25 POINTS *** TRY AGAIN" 

510 FOR T = 1 TO 100 : NEXT : POKE M + 24,0 : END 

Our program will clear the screen, play the effect, change the back- 
ground color to red (Line 205) and then to black (Line 206), repeat 
the process four times, and then print out a message before ending. 

Here is a program that will produce sixteen color bars, one for each 
of the 64's colors, across your display screen. After each color bar, 
a tone will be produced. Make sure to place the end quote and 
semicolon properly in the second display line of Line 60. Otherwise, 
the graphics will not run correctly. The reversed field R in Line 60 
is produced by pressing the control key and 9 simultaneously. 

10 POKE 53280,0 : POKE 53281,0 

20 PRINT "H": REM*** CLEAR SCREEN*** 

30 FOR W = 1 TO 16 

40 READ A 
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50 


PRINT 


60 


PRINT CHR$(A); : PRINT "Q 


65 


REM *** SOUND *** 


70 


POKE 54296,15 


80 


POKE 54277,0 : POKE 54278,128 


90 


POKE 54273,28 : POKE 54272,49 


100 


POKE 54276,17 


110 


FOR T = 1 TO laa : NEXT 


120 


POKE 54276,16 


130 


NEXT W 


135 


POKE 54296,0 : END 


140 


REM ♦** COLOR DATA *** 


150 


DATA 5,28,30,31,129,144 


160 


DATA 149,150,151,152,153,154,155 


170 


DATA 156,158,159 



As you can see from the REM statement, the sound commands begm 
on Line 70 and continue onto Line 120. They should, by this time, 
be quite familiar. 

You can diversify this program by changing your sound program- 
ming. This is accomplished by expanding your READ statement to 
include values to be POKEd into the high and low frequency number 
registers. 

10 POKE 53280,0: POKE 53281,0 

20 PRINT "S" : REM *** CLEAR SCREEN *♦» 

30 FOR W = 1 TO 16 

40 READA,B,C, 

50 PRINT 

60 PRINT CHR$(A); : PRINT " Q 

65 REM *** SOUND **» 

70 POKE54296,15 

80 POKE 54277,0 : POKE 54278, 128 

90 POKE 54273,B : POKE 54272,C 

100 POKE 54276,17 

110 FOR T = 1 TO 100 : NEXT 

120 POKE 54276,16 

130 NEXT 

140 REM *** COLOR & NOTE DATA *** 

150 DATA 5,33,135,28,37,162,30,42,62,31,44,193,129,50,60,144,56,99 
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160 DATA 149,63,75,150,67,15 

170 DATA 151,67,15,152,63,75,153,56,99,154,50,60,155.44,193,156.42,62 
180 DATA 158,37,162,159,33,135 

We changed Line 40 from: 

40 READ A 

to read: 

40 READA.B.C. 

We then changed Line 90 to 90 POKE 54273,B : POKE 54272,C. 
Finally, we altered our DATA Bank by placing the new values for 
B and C in between the old values for A. 

Our program will now display the color bars, and after each bar 
appears, a different note of the diatonic scale will be sounded - 
ascending for the first eight, and descending for the second eight colors. 

If you are perplexed by some of the graphics commands, we sug- 
gest you consult your User's Guide or the Programmer's Reference 
Guide. You may also want to read An Introduction to the Commodore 
64; Adventures in Programming by Nevin Scrimshaw and James 
Vogel. 
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26 Using the Random Number 
Function to Create Effects 



The Commodore 64 has a built-in feature for generating a series of 
random numbers. Actually, these are not truly random numbers, as any 
series may be reproduced by starting with the same seed number. For 
our purposes, however, the effect is random enough. RND is the BASIC 
command to call this function into play. 

Here is a program that uses the random number function. 

5 REM *** INSECT SPEECH *** 

10 FOR M = TO 24 : POKE 54272 + M,0 : NEXT 

20 M = 54272 

30 POKE M + 24,15 

40 POKEM + 5,16:POKEM + 6,255 

50 FOR Z = 1 TO 5 

60 POKE M + 1 .RND(Z)*50 + 54 

70 POKE M + 4,33 

80 FOR K = 1 TO 4 : NEXT K 

90 POKE M + 4,32 

100 NEXTZ 

200 C = C+1 :IFC = 25THEN500 

210 GOTO 50 

500 POKE M + 24,0: END 

In this program, we introduce the random number function in Lines 
50 and 60. 



50 FOR Z = 1 TO 5 

60 POKE M + 1 ,RND(Z)*50+ 54 

M + 1 will be POKEd with a random number between 54 and 94. When 
the computer comes across the RND, it will produce a random floating 
point decimal number between 0.0 and 1 .0. The value of Z is the seed. 
Actually, this is a "dummy" number. The computer is more interested 
in knowing if the seed is positive, negative, or 0. It will then take its 
decimal number and multiply it times 50 and then add 54 to that. Since 
the random number is always 1 or less, the largest number obtainable 
is 94. The smallest is 54. The computer will then truncate the numbers, 
and present the final value as an integer. This random integer is then 
POKEd into the high frequency register, producing our sound effect. 

To vary the pitch of this effect, you can alter the numbers 50 and 
54. A higher totJil will produce a higher pitch. For a greater variety 
of pitch, you can make the spread between the numbers greater. 

Try a few changes to see what we mean. The only constraint which 
you must observe is that you cannot use a number larger than 255. 
If you do, you will get an "ILLEGAL QUANTITY" error message, 
since the low frequency register does not accept numbers larger than 
255. 

Here's another random number program that adds still another twist. 
We call it "Just Plain Nuts"— for obvious auditory reasons. 

5 REM *** JUST PLAIN NUTS *** 
10 FOR M = TO 24 : POKE 54272 + M,0 : NEXT 
20 M = 54272 
30 POKE M + 24, 15 
40 POKE M + 5,16: POKE M + 6,255 
50 FORZ = 1 TO 15 
60 POKE M + 1 ,RND(Z)*225 + 20 
70 POKEM + 4,17 
80 FOR K = 1 TO 4 : NEXT K 
90 POKE M + 4,32 
m NEXTZ 

2&d C = C+1 : IFC = 25THEN500 

210 GOTO 50 

500 POKE M + 24,0: END 

We use essentially the same format for this program as in "Insect 
Speech." The twist comes in Lines 70 and 90. What we've done on 
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Line 70 is to open the waveform gate and turn on the triangle 
waveform. In Line 90, we close the gate, but change the waveform 
to 32. That means that the RELEASE cycle, which was set at its max- 
imum, will have a sawtooth value. Try this trick on some of your music 
programs if you get tired of the way they're sounding. 
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27 Ring Modulator 

and Synchronization Effects 



With the SiD's Ring Modulator, you can produce astounding sound 
effects. When set, the Ring Mod bit takes the output of two oscillators 
and produces tones that are the sum and difference of their output. To 
understand how to set the Ring Mod bit, you have to take a look at 
the waveform registers for each voice. 



Decimal 
Control 
Number 


128 


64 


32 


16 


8 


4 


2 


1 


Function 


White Noise 


Pulse 


Sawtooth 


Triangle 


s 


Ring Mod. 


Sync. 


Gate 


Bit 
Number 


7 


6 


5 


4 


3 


2 


1 






As you can see, the Ring Modulator is located on Bit 2, with a decimal 
control number of 4. To utilize the function, you must add the Ring 
Mod to the triangle waveform. Thus, the statement POKE 54276,21 in- 
structs the computer to use the Ring Mod function for Voice 1. 
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16 = triangle waveform 
4 = Ring Mod 
+ 1 = opens gate 

21 

In addition, you must mix the output of Oscillator 3 with that of 
Oscillator 1. This can be accomplished as follows: 

POKE 54273,28 : POKE 54287,49 

What we have done here is to POKE values into the high frequency 
number registers of both Voice 1 and Voice 3. No further settings are 
required for Voice 3. It is not necessary to turn on Voice 3 waveforms 
or ADSR. 

To hear what the Ring Mod can do, let's insert these commands 
into a program we used early on, called "Nick's Scaler." 

1 REM *** RING MOD EFFECT *** BY J.C. VOGEL & NICK 

5 FOR Z = 54272 TO 54296 : POKE Z,0 : NEXT 
10 FORI = 0TO7 
20 POKE 54296,15 
30 POKE 54277,0 : POKE 54278,240 
40 POKE 54276,21 

50 READ A : IF A = - 1 THEN GOTO 900 
60 A = A/2 1 I 

70 LVo = A/256 : H% = A-(256*L%) 
80 IFTKTM + 2THEN80 
90 TM = TI 

m POKE 54273,L% : POKE 54287,H% 
110 GOTO 40 

200 DATA 64814,61176,57743,54502,51443,48556,45830,43258,40830,38539, 

36376,34334 
800 DATA - 1 
900 RESTORE 

910 NEXT I : FOR T = 1 TO 3000 : NEXT : POKE 54296,0 
920 END 

Originally, this program played a chromatic scale for the entire range 
of the 64. Now, with just a few changes, we get a remarkably different- 
sounding program. We changed Line 40 to use the Ring Modulators. 
It now reads: 

40 POKE 54276,21 



In addition, we changed Line 100 to mix the output of oscillators 3 
and 1. It now reads: 

100 POKE 54273,L% : POKE 542873"% 

By the way, % stands for Integer. 
To utilize the Ring Mod function for Voice 2, 

POKE 54283,21 

and mix it with the output of Voice 1 as follows: 

POKE 54280,28: POKE 54273,49 

Similarly, for Voice 3, mix the output with Voice 2: 

POKE 54290,21 

POKE 54287,28 : POKE 54280,49 

You will notice that no other settings are used for Voice 3 other than 
its high frequency number. This is all the 64 needs when it is using 
Ring Modulation. The ADSR or other setting for Voice 3 will have 
no effect. The same rules apply for mixing the other voice. 

SYNC FUNCTION 

The Sync function synchronizes the fundamental frequencies of the 
pitches. It is sometimes used when combining the two waveforms to 
produce a desired overall sound. For instance, a pulse wave and a 
sawtooth wave combined may produce an undesirable beating effect. 
The Sjmc function can be used to eliminate this problem. This pro- 
cedure, however, is only for very specific instances. A more general 
use of the Sync is for sound effects. It can create very unusual types 
of electronic sounds. 

You can produce the Sync effect by using exactly the same pro- 
cedures as we used for the Ring Mod function. The only difference 
is that, instead of POKEing 21 into the waveform register, you POKE 
19. This is because the Sync function is located on Bit 1 , with a decimal 
control number of 2. 

16 = triangle waveform 
4 = Sync function 
+ 1 = gate 

19 

To hear what the Sync can do, let's alter another one of our pro- 
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grams. We've chosen "Jazz Bass Line," which appears at the end of 
Chapter 21. 

10 REM *** SYNC BASS LINE *** 

20 FOR Z = 54272 TO 54296 : POKE Z,0 : NEXT 

30 M = 54272 

40 POKE M + 24,15 

50 POKE M + 5,9: POKE M + 6,15 

55 J = J + l:IFJ = 3THENFORT= 1 TO 1000 : NEXT : POKE M + 24,0 
: END 

60 READ H,L,DR : IF H < THEN 500 

70 POKE M+15,H: POKE M+1,L 

80 POKE M-h 4,19 

90 FOR Q = 1 TO DR : NEXT 

110 POKEM + 4,18 

115 FOR T = 1 TO 30 : NEXT 

120 GOTO 60 

200 DATA 3,244,25,4,180,25.5,71,150,4,180,200 

210 DATA 3,244,25,4,180,25,5,71,150,4,180,100,4,180,100,-1,-1,-1 

220 DATA 5,71,25,6,71,25,7,12,150,6,71,2aei 

230 DATA 5,71,25,6,71,25,7,12,150,6,71,100,6,71,100, -1,-1,-1 

500 C = C+ 1 : IF C = 1 THEN RESTORE : GOTO 60 

510 IFC = 2THEN60 

520 IF C = 3 THEN RESTORE : GOTO 60 

530 IF C = 4 THEN RESTORE : C = 0.GOTO 55 

The only changes occur in Line 70, where we mix in the output of 
the Voice 3 high register; in Line 80, where we activate the Sync; and 
in Line 1 10, where we turn it off. 

It should be noted that the Sync function works better when the 
lower pitch is in the mixed-in oscillator— as, in this case, Voice 3. That 
is why we have placed Voice 3 first. If you examine the DATA, you 
will see that the first variable is always lower. Other than this, the 
same rules for mixing the voices that we used for the Ring Modulator 
can be used for the Sync function. To utilize the sync for Voice 2, 
POKE 54283,19 and mix it with the output of Voice 1 as follows: 

POKE 54280,28 : POKE 54273,49 

Similarly for Voice 3, mix the output with Voice 2. 

POKE 54290,21 

POKE 54287,28 : POKE 54280,49 
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28 Programming Filters 



Using the SID's filters is not so much a sound "effect" as the way 
of "affecting" your sound. If you have not, as yet, read Chapter 5, 
"Understanding Filters," we suggest you go back and do so at this time. 

As stated earlier, the SID offers you three filters, called low-pass, high- 
pass and band-pass. A band-reject filter may be produced by adding 
the high-pass and low-pass filters together. You can also add resonance 
to each filter setting. 

The filter controls are located on registers 54293-54296. 



Decimal 
Control 
Number 


128 


64 


32 


16 


8 


4 


2 


1 




54293 












FC2 


FCl 


FCO 


LOFC* 


54293 


FCIO 


FC9 


FC8 


FC7 


FC6 


FC5 


FC4 


FC3 


HIFC# 


54295 


RES3 


RES2 


RESl 


RESO 


FLTX 


FLT3 


FLT2 


FLTl 


RES/FLT VOICE It 


54296 


Voice 
3 OFF 


HP 


BP 


LP 


VOL3 


VOL2 


VOLl 


VOLO 


FLT&VOL 


Bitii' 


7 


6 


5 


4 


3 


2 


1 
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To utilize the filters, follow these steps: 

1. Choose the voices you wish to filter. The control for voice selection is 
located at register 54295. For Voice 1, POKE 54295,1; for Voice 2, POKE 
54295,2; for Voice 3, POKE 54295,4. For a combination, such as Voices 
1 and 3, just add the decimal control numbers: POKE 54295,5. Enter 
this setting onto a program line near the beginning of the program, 
preferably before the ADSR and waveform settings. The FILTEX set- 
ting is for external audio input signals. 

2. Choose your filter mode. The control is located on register 54296, the 
same as your volume control. The low-pass has a 16 control number, 
band-pass a 32, and high-pass a 64. Add the filter setting to the volume. 
Thus, a low-pass filter with a maximimi volimie setting would be pro- 
grammed with POKE 542%,31. Enter this into your program where you 
usually enter the volume. 



15= volume 
+ 16= low-pass filter 



31= setting 

3. Choose the cutoff frequency. The cutoff frequency is encoded as an 1 1-bit 
number, so two registers are necessary. They are 54293 and 54294. The 
low bit number on register 54293 must fall within 0-7 inclusive. The high 
bit number on register 54294 can be within 0-255 inclusive. The higher 
the number entered, the higher the frequency cutoff. Enter these settings 
into the program right after the Filter Voice setting in step 1. 

4. If you want to add Resonance to your filter settings, simply add the 
decimal control numbers to your voice selection on register 54295. Thus, 
a maximum resonance setting for a Voice 1 filter would be programmed 
as POKE 54295,241. 

128 = Res bit 3 
64 = Res bit 2 
32 = Res bit 1 

16 = Res bit 
+ 1 = Voice 1 filter 



241 = Final setting 

Here is a sample program showing how these settings are entered in- 
to a program. 

1 REM *** FILTER SETTING *** 

5 FOR M = 54272 TO 54296 : POKE M,0 : NEXT 
10 POKE 54295,129 : POKE 54293,0 : POKE 54294.100 
15 POKE 54296.31 
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20 POKE 54277,0 : POKE 54278, 128 

25 READ H,L : IF H<0 THEN END 

30 POKE 54273,H : POKE 54272,L 

40 POKE 54276,33 

50 FOR T = 1 TO 9001 : NEXT 

60 POKE 54276,32 

70 GOTO 25 

m DATA 16,195,18,209,21,31,22,96,25,30 

110 DATA 28,49,31,165,33,135, -1,-1 

All of our settings for the filters are accomplished on Lines 10 and 15. 

10 sets the filter for Voice 1 with moderate resonance: the low cutoff 

number is 0; the high cutoff number is 100. 
15 sets the low-pass filter and the volume at 15. 

To hear what this program would sound like without the filter, 
simply change the setting for register 54295 from 129 to 0. This also 
demonstrates that, unless you specify which voice you wish to filter, 
all your other filter settings have no effect on the program. 

Using the programmable filter is a fairly subtle procedure, as there 
are a number of settings which you must control. The cutoff frequency 
number is particularly significant in controlling the output of your 
sound. The approximate cutoff frequencies range from 30 Hz to 12 
KHz. Hz stands for Hertz, which are the same as cycles per second. 
Again, the higher the number is, the higher the frequency. 

To better understand this, look at our sample filter program. We 
use a low-pass filter which will pass the frequencies below the cutoff 
number, and attenuate those above. We use a setting of 54293,0 : 
54294,1001. If we raise our cutoff number to 54293,0 : 54294,240, our 
cutoff sound will be closer to the original unfiltered sound. That is 
because we are raising the cutoff point— thus allowing more of the 
original harmonics to pass unfiltered. 

If we were using the high-pass filter, the output result would be the 
opposite, since the high-pass filter passes those harmonics above cutoff 
while attenuating those below. 

The best way to "get hold of the filter controls is to put aside an 
hour and experiment with different settings and different filters. 
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29 Frequency Modulation 



A multitude of sound effects can be produced through frequency 
modulation. Frequency modulation occurs when you mix the frequen- 
cy output of two generators. This is accomplished on the 64 with the 
use of a new register number, 54299. This register is a "read only" register,, 
which means that you don't POKE it, you PEEK it. The PEEK func- 
tion allows you to read what has been stored on a particular byte. 

Register 54299 allows the 64 to read the upper eight bits of the Voice 
3 oscillator. The numbers generated by that oscillator are regulated by 
the waveform selection. If the triangle waveform is chosen, the oscillator 
will output a series of numbers incrementing from to 255, and then 
decrementing from 255 back down to 0, at a rate defined by the fre- 
quency. If the sawtooth waveform is chosen, the output will be a series 
incrementing from to 255. If the pulse is chosen, the output jumps 
between and 255. The rate of change of the numbers is defined by 
the frequency of Voice 3. The white noise waveform will result in a ran- 
dom series of numbers. 

If you mix the output of this register with another voice, you have 
frequency modulation. In order to accomplish this, you must turn off 
the audio output of Voice 3, by setting the 3 OFF bit located on register 
54296. The waveform will now be used to modulate another voice for 
frequency modulation. POKE 54296,143 is the correct setting. 

128 = 3 OFF 
+ 15 = volume 

143 
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To see how this works, type in this program: 

im M = 54272 

1 10 FOR Z = 54272 TO 54299 : POKE Z,0 : NEXT 

120 POKE M+ 14,20: POKE M+ 18,16 

130 POKE M + 24, 143 

140 POKE M + 6,240: POKE M + 4,33 

150 N = 5728 

160 FOR T = 1 TO 300 

170 FQ = N + PEEK(M + 27)*100 

180 HF = INT(FQ/256) : LF = FQ-HF*256 

190 POKE M.LF: POKE M+1,HF 

200 NEXT 

210 POKE M + 24,0 

Here is a line-by-line description. 

100 initializes M to 54272. 
1 10 cleeirs the chip. 

120 sets the low frequency register for Voice 3; sets the waveform for 
Voice 3. 

130 turns OFF Voice 3 audio output; sets volume to 15. 
140 sets ADSR for Voice 1; sets waveform for Voice 1. 
150 sets (N) equal to frequency number (5728) obtained from table. This 

is the carrier frequency. 
160 begins play loop. 

170 sets the frequency FQ equal to N + the value read from 54299 * 

100. (54299 is the upper eight bits of Voice 3 oscillator.) This is the 

frequency modulation Une. 
1 80 converts the frequency number (produced in Line 170) to a high and 

a low frequency number. (See Chapter 9.) 
190 sets the high and low frequency number registers for Voice 1 with 

the numbers derived from Line 180. 
200 instructs the computer to go back and do it again. 
210 turns off the volume. 

If you are unclear about the formula used in Line 180, there is an 
explanation in Chapter 9, "Advanced Pitch Control Techniques." 

To experience the true range of this effect, try changing the variables. 
We suggest you start with Line 120. Change the waveform selection 
to sawtooth, then pulse, and then white noise, to hear the various forms 
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of modulation. Don't forget to add a pulse width number when you 
use the pulse waveform. 

After you've experimented with the waveforms, try changing the 
low frequency number for Voice 3, also in Line 120. Another number 
you can change is in Line 150. To obtain a new number, consult the 
Table of Note Values, or make one up. 

Finally, you can change a number in Line 170. This is the number 
on the far right. It is currently set at 100. A change here has a dramatic 
effect. Try replacing the 100 with a 2 to hear what we mean. Frequency 
modulation is one of those effects that is particularly well-suited for 
a computer. 

Another form of modulation can be accomplished using a similar 
method, but with the output of the top eight bits of the Voice 3 
envelope generator. For this effect, use register 543001. You can mix 
the output of this register with the filter frequency output of another 
oscillator to create a "phasing" effect. Your one rule here is that the 
gate for the third voice must be open. A waveform setting is not 
necessary. 

Try out this program to hear the phasing effect. 

100 M = 54272 

1 10 FOR Z = 54272 TO 54300 : POKE Z,0 : NEXT 

120 POKE M + 24, 143 

130 POKE M+ 19,255 

140 POKE M + 6,240: POKE M + 4,33 

145 POKE M+ 18,1 

150 FOR T = 1 TO 300 

160 N = 5728 

170 FQ = N + PEEK(M + 28)* 10 

* 180 HF = INT(FQ/256) : LF = FQ-HF*256 

190 POKE M,LF: POKE M+1,HF 

200 NEXT 

210 POKE M + 24,0 

Here is the line-by-line description. 

100 initializes M equal to 54272. 

110 clears the chip. 

120 sets the volume; turns off the audio output for Voice 3. 

130 sets ADSR for Voice 3. 

140 sets ADSR for Voice 1. 
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145 opens the gate for Voice 1. 

150 begins the loop. 

160 establishes the frequency number. 

170 adds the frequency number to the value read in register 54300 
multiplied by 10. 

180 converts the FQ number to high and low FQ numbers 

190 sets the high and low FQ registers for Voice 1. 

200 instructs the computer to go back and do it again. 

210 turns off the volume. 

The general approach here is to take the output information from 
one voice and use it as an input to another. This technique can be 
used in different ways to produce a variety of effects. 

The ability of the computer to perform complex mathematical func- 
tions at a rapid speed makes effects such as this one and others that 
you have heard possible. Take some time to play with these ideas and 
see what you can do. The results are often surprising and almost always 
entertaining. 

Now, let's move on and explore a new area of programming: using 
arrays. With the help of this new programming procedure, you will 
be able to play complex songs with independent control of multiple 
voices and note duration. You will also be able to create your own 
"real time" organ using the 64's keyboard. 
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SECTION V 




Programming Music Using 
the Array Format 



In Section III, we showed you how to program music usmg the 
READ/DATA format. That method proved quite useful for a variety 
of situations, but had a few drawbacks. The first drawback was its limita- 
tion in the manipulation of DATA. Our only option was to RESTORE 
the entire Ust and begin again. That's useful for some pieces of music, 
but for more complicated pieces it is not so useful. The second drawback 
was it required using ever-increasing lists of DATA, which, after a while, 
became quite cumbersome. Finally, it did not allow for a practical method 
to control the multiple voices with independent duration control. For 
these reasons, we must look to another method to solve these problems. 
The method we'll discuss here involves a slightiy more complicated tech- 
nique, the use of arrays. 

An array is essentially nothing more than a list. What makes it dif- 
ferent from the list in a DATA statement, however, is that in creating 
an array, you set aside a portion of the computer's memory to store 
the list. Once the array is stored in memory, you can access it as many 
times as you like without having to RESTORE the information. Another 
powerful aspect of arrays is that each element in the list has its own 
name. That means that you can go directiy to any element or portion 
of the list you desire. 

You can even make up lists with many columns of numbers, as we 
will show you shortly. These are called dimensions of the array. This 
capacity is particularly useful in music programming because we often 
have occasion to call up groups of numbers such as the high and low 
frequency mmibers. 

We'll show you how to set up these different kinds of arrays in the 
following chapters. 
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30 Using Subscripted Variables, 
Simple Arrays, 
& The DIM Statement 



Here is a program that we used in Section I to demonstrate our four 
waveforms. It accomplishes this through the use of a simple array. 



5 


REM ••* FLIGHT OF THE BUMBLE BEE *** 


10 


FOR M = 54272 TO 54296 : POKE M,0 ; 


; NEXT 


20 


WF(0) = 33 : WF(1) = 17 : WF(2) = 65 


: WF(3) = 129 


30 


POKE 54296,15 




40 


POKE 54274,9 : POKE 54275,255 




50 


POKE 54277,137 : POKE54278,128 




60 


READ H.L 




70 


IF H<0 THEN 900 




80 


POKE 54273,H : POKE 54272,L 




90 


POKE 54276,WF(I) 




100 


FOR T = 1 TO 50 : NEXT 




110 


GOTO 60 




200 


DATA28,49,26,156,25,30,23,181,22,96 




210 


DATA 29,223,28,49,26,156,28,49 




220 


DATA 26,156,25,30,23,181,22,96 




230 


DATA 23,181,25,30,26,156, -1,-1 




900 


POKE 54276,0 




910 


RESTORE : I = 1+ 1 : IF I = 4 THEN END 


920 


GOTO 60 
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We create our array in Line 20. It consists of four parts, or elements, 
called subscripted variables. They are WF(0), WF (1), WF(2), and 
WF(3). As you can see, part of the name, WF, remains the same, but 
the part in parentheses is variable. This part is known as the subscript. 
When the computer encounters a subscripted variable such as WF (0), 
it recognizes it as an array, and immediately sets aside, or "dimen- 
sions" a portion of memory to hold eleven elements. This means that, 
even though we only used four elements in our array, enough memory 
was automatically reserved potentially to hold WF(4)-WF(10). If we 
had wished to use more than eleven elements, we would have had to 
use another array-devising procedure, which we will describe shortly. 
That procedure utilizes the BASIC DIM Statement. 

When creating an array with subscripted variables, the first 
characters in the name must be a letter. The second optional characters 
may be a numeral or letter. Thus, WF(0), W3(0), and W(0) are all 
possible choices, while 3F(0), 33(0), 3(0) are syntactically illegal. 

The other important task accomplished in Line 20 was the assign- 
ment of information to be held in the array. Here we used a direct 
method by simply stating WF(0) = 33 : WF(1) = 17 etc. Now the com- 
puter places into its memory the information that it stores 33 as the 
first element on its WF list, 17 as the second element etc. 

On Line 90 of the program, we tell the computer to utilize this infor- 
mation each time it goes through the loop established between Lines 
60-110. 

90 POKE 54276,WF(I) 

In this case, I represents the current value of the counter set up in 
Line 910. Line 90 POKEs the value assigned to the Ith member of 
the array WF into Address 54276. For a more graphic explanation, 
add the following line to your progreun: 

95 PRINT WF(I) 

and try running it again. You should now see the waveform number 
of each note appear on the screen right after the note begins. 

To demonstrate that the array is stored in memory, or to verify that 
a particular element in the array is correct, try this little trick. Without 
using a program line, simply type in PRINT WF(2) and hit RETURN. . 
The computer should respond with a 65 printed on the screen. 
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USING THE READ/DATA STATEMENT 
TO LOAD THE ARRAY 

Another method to load an array is to READ in a DATA list. The 
difference between the DATA/READ into an array and a regular 
DATA list is that the DATA is now stored in memory, and each ele- 
ment of the list has been given a name. To demonstrate this quickly, 
try this short program. 

10 FOR I = TO 3 

20 READ WF(I) 

30 NEXT 

40 PRINT WF(0),WF(1),WF(2),WF(3) 

50 DATA 17,33,65,129 

After you run the program, which has no sound, type PRINT WF(2) 
and hit RETURN. The computer should respond with a 65, showing 
that the number 65 has been stored in an array under the name WF(2). 
We'll use this technique to load most of the arrays we use in music 
programming. 

THE DIM STATEMENT 

As mentioned earlier, when a subscripted variable is introduced into 
a program, a portion of memory is set aside to hold eleven elements. 
In this case, we have called them WF(0)-.WF(10). There may be occa- 
sions, however, when you wish to hold more than eleven elements in 
an array. When this happens, you must use the DIM statement. 

The DIM statement instructs the computer to set aside or DIMen- 
sion enough memory to hold a list. Thus, DIM WF(25) would DIMen- 
sion an array to hold 26 elements: WF(0)-WF(25). 

If we do not DIMension enough memory to hold our list, an error 
will occur during the execution of the program. 
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31 Using the Two-Dimensional 
Array Format for One 
Voice 



We are now going to add the Two-Dimensional Array Format to our 
repertoire of programming techniques. The following program will 
demonstrate the main advantage of this method. The program plays a 
scale four times. The first time through, it plays the whole scale. On 
the second pass, it begins at the third note of the scale. On the thurd 
pass, it begins at the fifth note, while on the final pass it plays the whole 
scale again. This demonstrates the increased flexibility in DATA 
manipulation that this form of programming offers. 

Type in this program. As you do so, you might want to look at the 
line-by-line description that follows the program. 

5 REM *** 2 DIM ARRAY *** 

10 DIMV(20,2) 

15 M = 54272 : Z = : C = 

20 FORS = MTOM + 24:POKES,0:NEXT 

30 POKE M + 24,15 

40 POKE M + 5,0: POKE M + 6,240 

45 REM •** LOAD THE ARRAY *** 

50 READH.L.DR 

60 V(Z,0) = H : V(Z,1) = L : V(Z,2) = DR : Z = Z+ 1 

70 IF DR = - 1 THEN GOTO 90 

80 GOTO 50 
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85 REM *** PLAY THE MUSIC ♦** 
90 Z = 

100 TM = TI : IF V(Z,0) = - 1 THEN 1000 

110 POKE M+1,V(Z,0): POKE M,V(Z,1) 

120 POKE M + 4. 17 

130 IF TI< TM + V(Z,2) THEN 130 

140 POKEM + 4,16:Z = Z+1 

150 GOTO 100 

200 DATA 16,195,8,18.209,8,21.31,8,22,96,8,25,30,8,28,29.8,31.165,8,33, 
135,24 

210 DATA -1,-1,-1 

999 REM *** DATACONTROL •** 
1000 C = C + 1 
1010 IF C = 1 THEN Z = 2 
1012 IF C = 2 THEN Z = 4 
1014 IF C = 3 THEN Z = 
1016 IF C = 4 THEN POKE M + 24.0 : END 
1020 GOTO 100 

Before we proceed with our line-by-line description, here is an over- 
view of what the program is doing. The program can be divided into 
three parts. In the first part, the DATA for the high and low frequency 
numbers, and the duration are being READ into an array. The array 
"V" has been DIMmed (20,2), and would look like this: 

Z 1 2 

16 195 8 

1 18 209 8 

2 21 31 8 
3 

4 

5 

6 
i 

20 I ▼ 
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This is known as a two-dimensional array. The statement DIM V 
(20,2) instructs the computer to create a two-dimensional array, twenty- 
one rows by three columns. The 2 in DIM V (20,2) represents the three 
columns of information loaded off the DATA. The first column, 0, 
holds the HF number, while the second column, 1, holds the LF 
number. The third column, 2, holds the duration number. The 20 in 
the statement represents the note number or row number that has been 
loaded into the array using the counter Z in Line 60. 

The second part of the program (Lines 90-150) uses the informa- 
tion stored in the array to play the music. 

The third part of the program controls what information will be 
used in the play section. 

Now, here is the line-by-line explanation. 

10 establishes space for a two-dimensional array which can hold a max- 
imum of twenty-one notes with three pieces of information for each 
note. 

15 initializes M to 54272; initializes the counters Z and C to 0. 

20 clears the chip. 

30 turns on the volume. 

40 sets the ADSR. 

50 reads the first three elements off the DATA list representing the high 

and low frequency and duration numbers, and assigns the variable 

names H, L and DR. 
60 loads the values read in Line 50 into an array. The current values of 

H, L, and DR are stored, along with the current note number Z. The 

counter Z is then incremented by 1. 
70 checks to see if the current value of DR is - 1. If it is, the program 

will pass to Line 90. 
80 creates a loop; instructs the computer to go back to Line 50 to READ 

the next piece of information in the DATA. 

90 reinitializes the counter Z back to for the play portion of the 
program. 

100 initializes TM to the "Jiffy Clock" TI; sets up a conditional statement: 
IF the value stored in the first column of the array reads - 1, THEN 
the computer is instructed to go to 1000. 

110 POKES the high and low frequency register with the current values 
of V (Z,0) and V (Z,l) respectively. 

120 turns on the waveform and opens the gate. 

130 instructs the computer, IF the current value of TI is less than TM 
+ the current value of V (Z,2) THEN remain on Line 130; keep play- 
ing the note. 
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140 closes the gate (ends the note); increments the counter Z. 
150 loops back to Line 100 and plays the next note. 
200 DATA for FQ numbers and duration. 
210 DATA flag. 
1000 increments the counter C. 

1010 instructs the computer, IF C = 1, THEN set the note counter Z to 

equal 2 (which is the third note stored in the array). 
1012 instructs, IF C = 2, THEN set the note counter Z to equal 4 (which 

is the fifth note stored in the array). 
1014 instructs, IF C = 3, THEN set the note counter Z to equal 4 (which 

is the first note stored in the array). 
1016 instructs, IF C = 4, THEN turn off the volume and END the 

program. 

1020 instructs the computer to go to 100 and play the next note. 

If you find the concept of using a zero as the first element in the array 
and a one as the second element too much of a "double think," then 
initialize the Z to be equal to 1 in Line 15 and Line 90. If you do this, 
then also increase the Z's in Lines 1010, 1012 and 1014. 

We hope that you are now understanding the array concept. If not, 
don't worry about it. YouH catch on, just give it time. You may also 
consult one of the many texts on BASIC programming that are available 
for more examples. You can still use the programs we've provided as 
a guide. Later on, you can fashion your own program to fit your needs. 
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32 Creating Two Characters 
With One Voice 



Here is another program that utilizes the array format. It combines 
the use of both a simple array and a two-dimensioned array to create 
the impression of two different instruments, or characters, using one 
voice. Different phrases are played using different waveforms and ADSR 
settings. The effect is something like a call and response. You can use 
this technique to give the impression that many different instruments 
are involved in the playing of a piece, even though only three are available 
for any one time. Notice that, while we used an array to change the 
waveform, it was necessary to type in the new ADSR setting each time 
the voice changed. That is because the ADSR settings are not part of 
the loop that actually POKEs in the values that play the music. 

Also notice that we used a number of flags in our DATA. This has 
made it possible to repeat much of the material without having to write 
out extra DATA entries, as in the READ/DATA format. While the main 
body of this program requires more lines than our previous method, 
it reduces the size of the DATA list. Well shrink it even further in our 
next chapter. « 

For now, however, spend some time with the program and work it 
through. A line-by-line description follows the program. You can refer 
to it if you want clarification. 

5 REM **• MUSETTE ♦** II *** J.S.BACH 

10 DIMV(200I,2) 

15 WF(0) = 16 : WF(1) = 64 

20 M = 54272 : C = 
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25 FOR S = 54272 TO 54296 : POKE S,0 : NEXT 

30 POKE M + 2,25 : POKE M + 3,8 

35 POKE M + 24, 15 

40 POKE M + 6,255 

45 REM *** LOAD THE ARRAY *** 

50 READH,L,DR 

55 V(Z,0) = H : V(Z,1) = L : V(Z,2) = DR : Z = Z+ 1 

60 IF DR = THEN GOTO 80 : REM *♦* END LOADING *** 

70 GOTO 50 

75 J = J+1:IFJ = 2 THEN POKE 54296,0 : END 

80 Z = 

85 IF V(Z,0) = - 1 THEN 1000 

90 TM = TI 

95 REM *** PLAY THE MUSIC *** 

im POKE M + 1,V(Z,0): POKE M,V(Z,1) 

110 POKEM+4,WF(I)+l 

120 IFTI<TM + V(Z,2)THEN120 

130 POKE M + 4,WF(I) : Z = Z+ 1 

150 GOTO 85 

200 DATA 67.15,28,59,190,7,56,99,7,50,60,7,44,193,7, -1,-1,-1 

210 DATA 28,49,7,29,223,7,33,135,14,29,223,14,28,49,14, -1,-1,-1 

220 DATA25,30,14,33,135,14,28,49,14,22,96,14,- 1,- 1,- 1 

230 DATA 25,30,14,33,135,18,22,96,36,-1,-1,-1,0,0,0 

1000 C = C+1:Z = 0:I = 

1010 IF C = 2 THEN Z = 6 : 1 = 1 : POKE M + 5,8 : POKE M + 6,15 

1011 IFC = 3THENZ = 12:1 = 1 

1012 IFC = 4THENZ = 0: 1 = 0: POKEM + 6,255 

1013 IF C = 5 THEN Z = 

1015 IF C = 6 THEN Z = 6 : 1 = 1 : POKE M + 5,8:POKE M + 6,15 

1016 IF C = 7 THEN Z = 17 : 1 = 1 

1017 IF C = 8 THEN Z = : C = : POKE M + 6,255 : Qt)TO 75 
1040 GOTO 85 

Here is the line-by-line description. 

10 DIMS the array V (200,2) to hold note information. 
15 creates a simple array holding waveform information. 
20 initializes M = 54272 and the counter C = 0. 
25 clears the chip. 
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30 sets the low and high pulse width numbers. 

35 sets the volume. 

40 sets the ADSR for the first voice. 

50 reads the first three elements from the DATA list. 

55 stores the information in the two-dimensional array and increments 
the note counter Z. 

60 signals the end of the array loading process. 

70 instructs the computer to loop back and read the next 3 elements of 
note information from the DATA list. 

75 sets up the counter J to play the song twice and then end. 

80 resets Z = for the play portion of the program. 

85 checks for flags. 

90 sets TM = TI, the "Jiffy Clock." 
100 POKES the high and low frequency number registers. 
110 turns on the waveform and opens the gate by adding one to the 
waveform number WF(I). 

120 checks the clock and plays the note for the duration value. 

130 closes the gate using only the waveform number WF(I). 

260-230 DATA and flags * note 0,0,0- flag to signal the end of the READ 
section (see Line 60). 

10190-1017 manipulates the DATA in the note array by resetting the note 
counter Z; changes the waveform WF(I); changes ADSR when 
necessary. It is the changes in waveform WF(I) and envelope (ADSR) 
that change the character of the voice. 

1040 instructs the computer to go back to the play section. 

Now let's put all of our programming knowledge together and create 
a program that will control multiple voices with independent duration 
for each voice. 
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33 Controlling Multiple Voices 
with Independent Duration 



This program will allow you to translate sheet music or your own com- 
positions into a format that can be executed by the computer. Your one 
limitation will be the number of voices available at any given time— 
which, of course, is three. 

To cut down on the length of the DATA list, we will be using a tech- 
nique of encoding our pitch outlined in Chapter 9, "Advanced Pitch Con- 
trol Techniques." With this approach, you do not have to enter the high 
and low frequency numbers. Instead, you will enter a single number 
known as the frequency number. This number may also be obtained 
from the Table of Note Values. 

In this program, three arrays are dimensioned to hold the informa- 
tion of the song. One will hold the high frequency numbers of all three 
voices. A second will hold the low frequency numbers, and a third will 
hold the duration information. 

During the READ portion of the program, the frequency numbers 
will be READ from the DATA list. Each number will then undergo a 
mathematical operation built into the program. This operation will break 
down the number into a high frequency and a low frequency number. 
This information is then loaded into the proper array. An explanation 
of the formula may be found in Chapter 9. 

The second number READ from the DATA statement will be the dura- 
tion number. This number will have an entirely new meaning for you, 
and is the secret to controlling the voices independentiy. 

Here is how it works. The playing portion of the program is built 
around a short time loop. All three voices will be processed through the 
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same loop simultaneously. The length of one pass through the loop 
represents a sixteenth note, two passes an eighth note, etc. The loop time 
may be as long or short as suits the music's tempo. The number that 
is encoded as the duration represents the nimiber of passes through the 
loop. 

Since the duration of a note now means the number of passes through 
the loop, when the duration is read from the DATA list, it must load 
the array with the gated waveform number and pitch controls for each 
pass through the loop. On the final pass, it must load a closed gated 
waveform to turn off the note. 

What this means is that a quarter note A-440 would be represented 
in the DATA as 7217,4. After the note has been READ, a series of opera- 
tions would be performed upon the numbers, resulting in the loading 
of three arrays with the following information: 

Hi FQ # Array Lo FQ # Array Duration Array 



The program is designed so that all the information for Voice 1 is read 
in first. Then Voice 2 is read in, and finally Voice 3. The operation is 
quite complex. As a result, there is often a 30 second silence before you 
hear the music. 

The playing portion of the program is the same as our previous pro- 
gram. The only real difference is that you must use three counters in- 
stead of one, to keep track of the three arrays. 

The BASIC programming language does not operate with the same 
speed as machine language programming. The more conditional 
statements it must check, therefore, the slower the program will run. 
Often, the first note duration of a song played for the first time will 
be slightly out of sync. This is because the computer is encountering 
the counters and conditional statements for the first time. You can com- 
pensate for this by programming a 0,1 as the first piece of DATA for 
each voice. Then the set-up time will not interfere with the music. 

Well talk more about this program further along. For now, type it 
in and sit back. The program plays continuously. If you want to end 
it, simply hit the RUN/STOP and RESTORE keys. 

This program demonstrates three independent voices. The first two 
play separate patterns that cycle over and over, while the third plays 
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the melody. 

1 PRINT "S" : REM *** CLEAR SCREEN *** 

2 PRINT "*** MUSIC BY JIM VOGEL *•*" 

3 PRINT PROGRAM DESIGN **♦" 

4 PRINT '•*** JIM VOGEL AND NEVIN SCRIMSHAW ***" 

5 PRINT "»********************************" 

6 PRINT "PLEASE WAIT: SETTING UP ARRAYS" 

7 PRINT «*♦*******************************" 
10 FOR S = 54272 TO 54296 : POKE S,0 : NEXT 
15 M = 54272 

20 DIM H(500,2),L{500,2),D(5a3,2) 

30 V(0) = 17 : V(l) = 17 : V(2) = 17 

40 REM *♦* LOAD ARRAY *** 

100 FOR K = TO 2 

110 1 = 

120 READ N,DR 

130 IF DR = THEN 200 

140 WF = V(K) : WX = WF-1 

150 HF% = N/256 : LF^ = N-256'^HF% 

160 IF DR = 1 THEN H(I,K) = HF% : L(I,K) = LF% : D(I,K) = WF : 

1 = 1+1: GOTO 120 

170 FOR J = 1 TO DR-1 : H(I,K) = HFVo : L(I,K) = LFVo : D(I.K) = 

WF : I = I+l : NEXT 

180 H(I,K) = HF% : L(I,K) = LF% : D(I.K) = WX 

190 1 = 1+1: GOTO 120 

200 NEXTK 

250 REM *** SOUND SETTINGS *** 

300 POKE M + 5,0 : POKE M + 6,255 

310 POKE M+ 12,0 : POKE M+ 13,255 

320 POKE M + 19,0 : POKE M + 20,255 

330 POKEM + 24,15 

399 REM *** FACING THE MUSIC *** 

400 PI = : P2 = : P3 = 

410 POKE M,L(P1,0) : POKE M+ 1,H(P1,0) 

420 POKE M + 7,L(P2,1) : POKE M + 8,H(P2,1) 

430 POKE M + 14,L(P3,2) : POKE M + 15,H(P3,2) 

440 POKE M + 4,D(P1,0) : POKE M+ ll.D(P2.1) : POKE M+ 18,D(P3.2) 

445 FOR T = 1 TO 3 : NEXT T 
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450 PI = Pl + 1 :P2 = P2+1 : P3 = P3+1 

455 IF D(P1,0) = THEN 2000 

460 IF D(P2,1) = THEN 2500 

465 IF D(P3,2) = THEN 3m 

470 GOTO 410 

600 REM *** LESS DATA! *** 

610 DATA 0,1,1432,2,3406,2,3215,2,2864,2,3215,2,3406,2 

620 DATA 2145,12 

630 DATA 1432,2,3406,2,3215,2,2864,2,3215,2,3406,2 

640 DATA 4291,6,2145,6,0,0 

700 DATA 0,1,0,48,5728,2,6812,2,5103,2,6430,2,5728,2,6812,2 

710 DATA 8583,2,7647,2,6812,2,6430,2,5728,2,5103,2,0,0 

800 DATA 0,1,0,96,17167,40,11457,4,17167,4,15294,4,11457,4,15294,40, 
11457,4 

810 DATA 15294,4,13625,24,11457,24,12860,40,11457,4,9634,4,8583,44, 
11457,4 

820 DATA' 12860,40, 1 1457,4,8583,4,7647,48,0,0 

2000 PI = 1 : GOTO 460 

2500 P2 = 49 : GOTO 465 

3000 P3 = 1 : P2 = 1 : GOTO 410 

Here is the line-by-line description. 

1-7 set up graphics display. 

10 clears the chip. 

15 initializes 54272 to M. 

20 DIMS three arrays to hold HI FQ #, LO FQ #, DR #. 

30 establishes an array to hold waveform numbers for three voices. 

40 REM Array loading procedure begins. 

100 instructs the computer to go through the process three times— once 
for each voice -when K = 0, Voice 1; when K = 1, Voice 2; when 
K = 2, Voice 3. 

110 initializes the note counter I. 

120 READS the first two numbers from the DATA and calls them N (for 

note) and DR (for duration). 
130 instructs the computer, IF the duration number is (the last entry 

for each voice's DATA), THEN it is go to 200 (the end reading for 

each voice). 

140 sets the variable WF equal to V(K). (The gated -ON- waveform 
= WF; the closed gate waveform -OFF -is called WX(WF.l). 
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150 sets the integer portion of HF (high frequency) equal to the frequen- 
cy number (N) divided by 256; and the integer portion of LF (low 
frequency) equal to the frequency number (N) minus the HF number 
times 256. 

160 instructs the computer, IF the duration number is 1, THEN store the 
high and low FQ number in the proper array and store the gated 
waveform number in the duration array; increment the note counter 
1; go to 120 for the next note. 

170 establishes a FOR/NEXT loop that stores notes with durations greater 
than 1; fills the arrays with the high and low FQ numbers and a gated 
waveform duration for all but the last pass through the time loop of 
the note. On each pass, the note counter I is incremented by 1. 

180 stores the last beat in the array with the same high and low FQ 
numbers, but with a closed gated waveform. This line turns off the 
note and begins the RELEASE cycle. 

190 increments the note counter I for the last beat stored in Line 180, and 
instructs the computer to go back to 120 to read the next note. 

NOTE -This cycle will repeat until a is read in the DR part of the 
READ statement. (See Line 130.) 

200 instructs the computer to go back and READ in the DATA for the 

next voice. 
250 REM: Sound settings. 
300-320 ADSR for three voices. 

330 sets the volume. (Optional filter settings should be placed here if used.) 

399 REM: Play the music portion of the program. 

400 initializes the note counters for Voice 1,2, & 3 to 0. 

410-430 POKES the high and low frequency register for all three voices. 
440 POKES the waveform control registers of all three voices with the 

numbers stored in the duration array. 
445 establishes time loop for 16th note; plays the note. 
450 increments the three counters. 

455 checks the next duration for Voice 1; instructs the computer, IF the 

value stored in the array is 0, to THEN go to Line 200. 
460 checks the next duration for Voice 2; instructs the computer, IF the 

value is 0, to THEN go to Line 2500. 
465 checks the next duration for Voice 3; instructs the computer, IF the 

value is 0, to THEN go to Line 3000. 
470 instructs the computer to go back to 412 and play the next 1/16 

measure (the next beat). 

NOTE— The in the DATA is the last duration value for each voice. 
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In the READ portion of the program, this acts as a flag to signal the 
end of the READ cycle for each voice. In the play portion, it acts as 
a flag to signal an exit from the program. This enables us to manipulate 
the order of notes for each voice. 

600 REM DATA. 
610-640 Voice 1 DATA. 
700-710 Voice 2 DATA. 
800-820 Voice 3 DATA. 

NOTE -The first two pieces of DATA for all three voices are 0,1. This 
is so that distortion of the first note, as described earlier, does not result. 

2000 manipulates the array for Voice 1; instructs the computer to return 

to 460 to check the next voice. 
2500 manipulates the array for Voice 3; instructs the computer to return 

to 410 to play the next note. 

DEBUGGING THE PROGRAM 

If you were extremely careful in typing in this program, then it ran. 
Great! Chances are, though, you made some mistakes. Usually, if you 
make an error in this type of program, you will receive a message such 
as, BAD SUBSCRIPT IN LINE 170. 

To debug, try this procedure. 

Locate what went wrong. List the line where the error occxured. For 
example: ^ 

LIST 170 

170 FOR J = 1 TO DR - 1 : H(I,K) = HF^ : L(I,K) = LF% : D(I,K) = 
WF : I = I+l : NEXT 

Then, have the computer print out the current value of each variable. 

PRINT I 
The computer responds 

I = 501 

This means that you have more elements than can be accommodated 
by yoiu- array DIM H(50S0I,2). This means, somewhere along the line, 
the computer did not reset I to when it was supposed to do so. Did 
you place the zeros at the end of the DATA? Were the values properly 
entered in the DATA? Did you leave one out? Did you put a period 
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between elements instead of a comma? etc. 

Do this with each variable. In this way, you can track down the bug. 

Be sure the save the program, even if it does not work properly. Then 
you can update the program. There is always the possibility of a crash. 
This occurs when the computer is frozen and you can't break out. The 
only option is to turn off the computer. If youVe saved your work, you're 
safe. If not— well, there goes an hour. 

Programming multiple voices with independent duration is no easy 
trick. It takes time and patience. Use our program as a model, and make 
up your own music. Or try and translate some sheet music, if you prefer. 
When you've become proficient, try to tailor your own program. 
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34 Real Time Music- 
Programming 
An Organ Keyboard 



Up until now, we have been playing "computer time" music. That is, 
we write a program and have the computer play it for us. Your Com- 
modore 64 has the ability, however, to play "real time" music. You press 
a key, and the computer responds with a note. At the time of this writing. 
Commodore has announced that it will be releasing a "piano keyboard" 
which can be hooked up to your 64. This event, however, is still months 
away. The next best thing is to write a program to turn the keyboard 
of the computer into an instrument. There have been a few excellent 
examples of this type of program in recent computer magazines. There 
is also a wonderful program for a keyboard in the appendix of your 
Commodore User's Guide. Though a little difficult to understand, it's 
well worth the time to type it into your 64 and to save it on disk or tape. 

We'd like to add our keyboard program to the growing list, and we'll 
show you how you can write one of your own. The beauty of this pro- 
cess is that you can assign different keys all kinds of functions. 

Our program is for a "Chromatic Chord Organ." With it, you have 
control of all three voices, a row of keys for each; a two-octave range 
for each voice; and a choice of two waveforms. The program allows 
you to hear permutations of a three-note chord over the two-octave range. 
In addition, you can use two voices as a drone and a third voice as a 
melody. This is because the voices remain ON for as long as you wish. 
The function keys are used to turn off the soxmd for each voice in- 
dependently or all together. To end the program, you press the space bar. 
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Here is the program. The graphic display at the beginning is purely 
optional. We'll show you how the program works after you've played 
some "real time" music. 

m PRINT "B" : REM *** CLEAR SCREEN ♦** 

110 PRINT "***DONALD'S CHROMATIC CHORD ORGAN***" 

120 PRINT BY DONALD KAHN & JIM VOGEL***" 

125 PRINT "*****»*****************************" 

135 PRINT "***PRESS TOP ROW KEYS FOR VOICE I***" 

145 PRINT «***PRESS 2ND ROW KEYS FOR VOICE II***" 

155 PRINT "***PRESS 3RD ROW KEYS FOR VOICE HI***" 

160 PRINT "***********************************" 

165 PRINT "PRESS Fl TO TURN OFF VOICE I" 

170 PRINT 

175 PRINT "PRESS F3 TO TURN OFF VOICE 11" 

180 PRINT 

185 PRINT "PRESS F5 TO TURN OFF VOICE III" 

190 PRINT 

195 PRINT "PRESS F7 TO TURN OFF ALL VOICES" 

200 PRINT 

205 PRINT "PRESS F2 FOR TRIANGLE WAVEFORM" 

210 PRINT 

220 PRINT "PRESS F4 FOR SAWTOOTH WAVEFORM" 

230 PRINT 

240 PRINT "PRESS F6 FOR LOWER OCTAVE" 

250 PRINT 

260 PRINT "PRESS F8 FOR LOWER OCTAVE" 

270 PRINT 

280 PRINT "PRESS SPACE BAR TO END" 

400 FOR W = 54272 TO 54296 : POKE W,0 : NEXT 

410 Z = 54272 

420 P = 

430 DIM A(12),B(12),C(12),D(12,3) 

440 FOR N = TO 12 : READ D(N,0) : READ D(N,1) : NEXT 

450 FOR N = TO 12 : READ D(N,2) : READ D(N,3) : NEXT 

460 FOR N = TO 12 : READ A(N) : NEXT 

470 FOR N = TO 12 : READ B(N) : NEXT 

480 FOR N = TO 12 : READ C(N) : NEXT 

490 POKE Z + 24, 15 
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500 POKE Z + 5,0: POKE Z + 6,240 

510 POKE Z+ 12,0: POKE Z+ 13,240 

520 POKE Z + 19,0 : POKE Z + 20,240 

530 POKEZ + 4,17 : POKE Z+ 11,17 : POKE Z+ 18,17 

540 GET M$ : IF M$ = "" THEN 540 

550 M = ASC(M$) 

560 IF M = 32 THEN 900 

570 IF M = 136 THEN POKE Z + 1 ,0 : POKE Z,0 : POKE Z + 8,0 : POKE 

Z + 7,0 : POKE Z+15,0 : POKE Z+14,0 
580 IF M = 136 THEN GOTO 540 
600 IF M = 139 THEN P = : GOTO 540 
610 IF M = 140 THEN P = 2 : GOTO 540 
620 IFM = 133 THEN POKE Z+ 1,0 : POKE Z,0 : GOTO 540 
630 IF M = 134 THEN POKE Z + 8,0 : POKE Z + 7,0 : GOTO 540 
640 IF M = 135 THEN POKE Z+ 15,0 : POKE Z+14,0 : GOTO 540 
650 IF M = 138 THEN POKE Z+4,33 : POKE Z+ 11,33 : POKE Z+ 18,33 : 

GOTO 540 

660 IF M = 137 THEN POKE Z+4,17 : POKE Z+ 11,17 : POKE Z+ 18,17 : 

GOTO 540 
670 1 = 

680 IF M = A(I) THEN POKE Z + 1 ,D(I,P) : POKE Z,D(I,P + 1) : GOTO 540 
690 IF M = B(I) THEN POKE Z + 8,D(I,P) : POKE Z + 7,D(I,P + 1) : GOTO 540 
700 IF M = C(I) THEN POKE Z + 15,D(I,P) : POKE Z + 14,Da,P + 1) : GOTO 
540 

710 1 = 1 + 1 

720 IF I < = 12 THEN 680 
730 GOTO 540 

900 FOR L = 54272 TO 54296 : POKE L,0 : NEXT 
1000 DATA 16,195,17,195,18,209,19,239,21,31,22,96,23,181,25,30,26,156, 
28,49 

1010 DATA 29,223,31,165,33,135 

1020 DATA 33,135,35,134,37,162,39,223,42,62,44,193,47,107,50,60,53,57,56, 
99 

1030 DATA 59,190,63,75,67,15 
1040 DATA 95,49,50,51,52,53,54,55,56,57,48,43,45 
1050 DATA 81,87,69,82,84,89,85,73,79,80,64,42,94 
1060 DATA 65,83,68,70,71,72,74,75,76,58,59,61,13 
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HOW TO BUILD AN ORGAN KEYBOARD 



To bxiild our organ keyboard, we made use of our knowledge of arrays, 
combined with the BASIC GET command and the Coirmiodore ASC 
codes. 

The GET Command 

The GET command instructs the computer to read each key that you 
type. The character is then stored in the keyboard buffer. The GET state- 
ment usually takes this form: 

10 GET A$ : IF A$ = "" THEN 10 

When this line is encountered, the computer stays on the line cycling back 
and forth, waiting for you to press a key. When the key is pressed, the com- 
puter executes whatever commands are linked to that specific key. Usually 
it is necessary to have a command to return to the GET A$ line, so that 
new information can be processed. 

The ASC Code 

The 64 uses the ASC code to evaluate the character received in the GET 
statement. A table of ASC codes for the 64 may be found in the Appen- 
dices of both the Users' Guide and the Programmer's Reference Guide. 
Each key on your computer has an ASC code, which is a number that 
specifically relates to that key. An ASC code number is programmed as 
ASC(X) where X equals the code number of the desired key. If you check 
your table, you will see that ASC(32) means the space bar, while ASC(66) 
means the letter A, and so on. 

With this knowledge, you can understand the concept that lies behind 
this program. 

PROGRAM OVERVIEW 

This organ program is put together in modules. The first module (Lines 
100^280) contains the graphics, which are optional. The next section (Lines 
430-480) creates arrays to hold the frequency numbers for two full octaves. 
In addition, it establishes three more arrays to hold the ASC codes for the 
three rows of keys we will be using. All this information is stored in the 
DATA bank. 

The next module is for permanent sound setting (Lines 490-530). 
The following section contains the GET command and a number of con- 
ditional statements to evaluate the character received (Lines 540-730). 
The final module is the "play" portion of the program. It POKEs the 
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appropriate sound registers with values stored in the arrays (Lines 490-530 
and Lines 560-700f). 
For a more in-depth look, follow this line-by-line program description. 

400 clears the chip. 

420 initializes the note counter P to 0. 

430 DIMS four arrays . A, B and C will hold the ASC codes for the first three 
rows of keys. D is a two-dimensional array, and will hold the high and 
low FQ numbers for two octaves. 

440-480 READS the DATA list and stores the information in the arrays. 

490 sets the volume. 
500-520 sets the ADSR for three voices. 

530 sets the waveform for three voices. 

540 gives the GET command: stay on Line 540 until a key is pressed. The 
character received will be named M$. 

550 sets M equal to the ASC code of the character received in the GET com- 
mand, M$. 

560 instructs the computer, IF space bar, to THEN go to 900 (end program). 
570-580 IF F7 (function key), turn off the sound for all three voices; go 
back to Line 540 and GET next key pressed. 

600 IF F6, THEN use the lower octave pitches; go back to Line 540 and GET 
next key pressed. 

610 IF F8, THEN use the upper octave pitches; go back to Line 540 and GET 
next key pressed. 

620 IF Fl , THEN turn off Voice 1 ; go back to Line 540 and GET next key 
pressed. 

630 IF F3, THEN turn off Voice 2; go back to Lme 540 and GET next note. 
640 IF F5, THEN turn off Voice 3; go back to Line 540 and GET next key 
pressed. 

650 IF F4, THEN turn on sawtooth waveform; go back to Line 540 and 

GET next key pressed. 
660 IF F2, THEN turn on triangle waveform. 
670 sets the counter I to 0. (This counter is used for Lines 680-720.) 
680-720 establish a loop to evaluate the top three rows of keys. When 

the key is found, the appropriate high and low frequency registers are set. 

NOTE — All three rows are set to play the same chromatic scale. If the se- 
cond key of the second row is pressed, the second note of the second voice 
is played. 

730 instructs the computer, after checking all the conditionals, go back and 
GET the next note. 
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900 ends the program. 

1000-1010 DATA for low octave high and low FQ numbers. 
1020-1030 DATA for upper octave high and low FQ numbers. 
1040 DATA ASC codes for top row. 
1050 DATA ASC codes for second row. 
1060 DATA ASC codes for third row. 

The organ takes a bit of time to get used to. Since most people are used 
to the major scale and the organ produces the chromatic scale, the notes 
do not work the way many people would expect. But figuring out the notes 
can be an interesting investigation. This organ offers much opportunity 
for unique chordal structiu-es. 

Also try the Drone effect. Set up a two-note drone in the lower octave, 
using the top two rows. Then, switch to the upper octave, using the Func- 
tion 8 key. Use the third row for your melody lines. It will remain in the 
upper octave. As long as you do not press a key in the top two rows, they 
will continue droning in the lower octave. 

You can play some beautiful, slow, meditative music using this set-up. 

If you want to change the pitches of the keys, you can do so by altering 
the DATA in Lines 1000-1030. Different octaves may be selected, or,- if 
you prefer, a diatonic, minor or modal scale. 

If you alter the DATA in Lines 1000-1030 to the list below, your 
chromatic chord organ will be converted into an F Lydian modal organ. 
If you use an F and C drone in the top two rows, you have the tuning to 
play a NORTH INDIAN CLASSICAL RAGA caUed YAMAN 
KALYAN. 

The drone is obtained by pressing ( — ) on the top row and (T) on the 
second row. 

1000 DATA 11.48,12,143,14,24,15.210,16.195,18,209,21,31,22.96,25.30,28,49 
1010 DATA 31.165,33.135.37.162 

1020 DATA22.96,25.30.28.49,31. 165.33.135,37.162.42,62.44.193.50,60.56.99 
1030 DATA 63,75,67,15.75.69 

Try making up your own organ. When you do, make sure to program 
26 notes, no more, no less. That's what it takes for the program to run 
properly. 
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SECTION VI 




Sounding A Final Note 



Computers have come to play a major role in the industrialized, 
and now, even in the developing nations of the world. Their uses are 
so far-reaching and varied that we cannot even begin to list them. With 
the advent of the new and inexpensive micro-processors, the so-called 
"revolution" has taken the next step: into our home. 

Like so many of the great technological advances of our time, com- 
puters have the capacity, if used wisely, to enrich our lives and culture. 
It is up to us to develop the "human" side of computers. What better 
area for this endeavor, then, than music — a truly international language, 
a form of communication that crosses time and cultural barriers? 

There are some who feel that the computer has no place in music. 
"How can a machine," they ask, "express the subtlety of the human 
spirit?" To a certain extent, these people are correct. We can never 
"replace" the musician with a computer. But it should be noted that a 
computer program is an extension of the person who created it as a vehicle 
for musical expression, just as the computer itself is an extension of the 
human mind reaching out for knowledge. It is a tool for scientists, artists, 
mathematicians, business people, teachers, and, yes, even musicians. 

It is in this spirit that we have written this book. We hope that it has 
been of some help in your music projects, and we are very interested 
in hearing from you about these projects. We invite you to write with 
questions, comments and programs to Jim Vogel or Nevin Scrimshaw, 
c/o Ashfield Books, Main Street, Ashfield, MA 01330. 
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Are you interested in electronic music? Do you dream of piaying 
"Rhapsody in Blue" . . . without a piano? You can . . . with THE 
COMMODORE 64 MUSIC BOOK. It will teach you to play your 
Commodore 64 as a musical instrument, and you'll pick up profes- 
sional programming skills along the way. 

THE COMMODORE 64 MUSIC BOOK is designed for people with 
little or no programming experience. It includes the fundamental 
techniques of musical composition, programming in BASIC, and 
electronic sound synthesis. All of the instructions are in practical 
step-by-step language, and are geared to teach , rather than train 
by rote. 

With THE COMMODORE 64 MUSIC BOOK, you can learn to com- 
pose music, write advanced programs, and enjoy the sheer pleas- 
ure of creation. 

Praised by Popular Computing for "simulating] the sounds of 
acoustic instruments better than any other personal computer," .. 
the Commodore 64 is an exciting addition to electronic musicology. 
With THE COMMODORE 64 MUSIC BOOK you can play too . . . 
from a simple one-voice tune, to a complex multi-instrumental 
score. Consider the possibilities! 

So, give Gershwin your best . . . with THE COMMODORE 64 
MUSIC BOOK! 



ISBN 0-8176-3158-5 
ISBN 3-7643-3158-5 



$14.95 



